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Unsere Aktion: 
„Fehlerhaftes Listing" 

Das Computronic-Redaktionsteam hat 
durch seine Leser ein großartiges Echo 
erfahren. Nochmals vielen Dank an 
diejenigen, die sich auf das Intensivste 
bemüht haben, den „Fehlerteufel" auf- 
zuspüren. 

Aber auch ein Lob an uns!! Denn jedes 
unserer abgedruckten Listings war 
korrekt. Bis auf die bewußte Ausnah- 
me: ATARI (Leider!!!) 
Nach dem großen Erfolg hat sich die 
Redaktion der COMPUTRONIC ent- 




Ein Dank an unsere Computerfans! 



schlössen, diese Aktion auch weiter- 
hin durchzuführen. 

Deshalb zum Ablauf noch einige Er- 
läuterungen: 

- Das Listing ist nur dann fehlerhaft, 

wenn das Programm sich aufhängt 
bzw. eine ERROR-Meldung ausgibt 
(richtige Programmiereingabe ist na- 
türlich Voraussetzung). 

- Wir sind für Vorschläge dankbar, 
die die Qualität unserer Programme 



verbessern, und werden diese Vor- 
schläge auch immer nach Möglichkeit 
berücksichtigen. 

- Auch wir können manchmal dem 
Fehlerteufel (+ LISTING +) unterlie- 
gen. Unser Team wird jedoch versu- 
chen, die Fehlerquote beim Listing- 
Abdruck so gering wie möglich zu hal- 
ten. Nach dem Motto: FÜR BARES 
GELD - (Zeitschriftenpreis) - KOR- 
REKTE LISTINGS!!! 



Hier die Gewinner über jeweils 100 f - DM: 



1. Achim Schlemmer, Bietigheim- 
Bissingen 

2. Karl Gruber, Wien 

3. Stefan Winkler, Zirndorf 

4. Kemal Ezcan, Maithal 

5. Günther Hinkelmann, Waltrop 



Los geht's ... 

... auch in dieser Ausgabe 

wieder 




i*-*£S3r' 
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Der SM-KIT 64 r eine 
wertvolle Hilfe zur 
Erstellung eigener 
Programme 



Unter dem Motto „Golden Tool" 
bringt die Firma SM-Software AG 
seit geraumer Zeit Programme auf 
dem Markt. SM-Text 64 und SM- 
Adreva 64 sind wohl die bekannte- 
sten Vertreter dieser Serie. Dieser 
Bericht befaßt sich mit dem Pro- 
gramm SM-KIT 64. 



Dabei handelt es sich nicht um eine 
weitere BASIC-Erweiterung, sondern 
um eine Hilfe zur Erstellung eigener 
Programme. Da die Funktionen dieses 
Kits auch nur während der Programm- 
erstellung nützlich sind, sind die Be- 
fehle nur im Direktmodus und nicht 
unter Programmkontrolle einsetzbar. 

Das Programm selbst wird auf einer 
Diskette geliefert und ist ca. 9.5 KByte 
lang. Nach einer angenehm kurzen La- 
dezeit von ca. 35 Sekunden erscheint 
ein Menue auf dem Bildschirm. Um 
dieses Menue zu verstehen, benötigt 
man noch einige Informationen. SM- 
Kit 64 besteht aus drei Programmtei- 
len, nämlich dem 



- SM-Kit/B für BASIC -Programmierer 

- SM-Kit/M für 6502-Maschinen- 
sprache 

und 

- SM-Kit/F für Floppy-Diskstationen 

Nach Erscheinen des Menues kann 
man wählen, ob man alle drei Teile zur 
Verfügung haben möchte oder ob der 
eigentlich vom SM-Kit/F belegte Spei- 
cherplatz für die eigene Programmie- 
rung frei gegeben wird. Meistens wird 
man sich wohl mit SM-Kit/B und SM- 
Kit/M begnügen, denn die Befehle von 
SM-Kit/F sind nur für den sehr fortge- 
schrittenen Programmierer nützlich. 
Doch dazu später. Weiter ^^ 2g 



Wer kann teilnehmen an unserer Aktion: 

Fehlerhaftes Listing? . . . Alle, die 

unseren Nachweis-Coupon einschicken und: 

Voraussetzung: 

- Sie müssen unter den ersten fünf eingegangenen Hinweisen sein, 

- der Nachweis des fehlerhaften Listings ist auf dem abgedruckten Nachweis- 
Coupon zu erbringen, 

- es können nur die ausgefüllten Nachweisscheine berücksichtigt werden! 

Coupon ausfüllen und einsenden an: Tronic- Verlag, Postfach, Kennwort: 
Listing, 3444 Wehretal 1. 




Nachweis-Coupon 



Kennwort-Listing 



Name/Vorname: 



Straße, Nr.: 



PLZ/Ort: Datum, Unterschrift 



Ich habe folgenden Fehler in einem Listing entdeckt: 



Programmname 



richtig ist: 



Seite 



Listing- Zeile 
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„ASCOM High Score " 
der neue Joystick 

Die erfolgreiche Jagd nach Spielpunk- 
ten fängt mit dem Joystick an. Er muß 
robust sein, trotzdem handlich und 
standfest, aber auch leicht zu bedienen 
sein, wie der neue ASCOM High Sco- 
re- Joystick von DYNAMICS zum 
Preis von 29,95 DM. 
Die vier Saugnäpfe sorgen für Standfe- 
stigkeit auf dem Tisch, behält man den 
High Score in der Hand, liegt er durch 
die zu beiden Seiten des Gehäuses an- 
gegossenen Griffstücke rutschfest in 
der Hand. Der Griff ist selbstverständ- 
lich ergonomisch geformt, jeder Finger 
hat eine Griffmulde. Am oberen 
Schaftende sind 2 Feuerknöpfe ange- 
bracht, sie sind mit Zeigefinger und 
Daumen zu bedienen. Weitere 2 Feu- 
erknöpfe sind in den Sockel eingelas- 
sen. Natürlich bietet der High Score 
mit seiner Schaltmechanik eine Acht- 
Wege-Steuerung, so daß eine hohe 
Richtungsgenauigkeit erreicht wird. 
Der ASCOM High Score-Joystick ist 
an alle Atari 2600, 400/800 und die 
XL-Modelle, Spectravideo, Commo- 
dore VC 20, C 64 und den Schneider 
CPC 464 anzuschließen. Mit dem ent- 
sprechenden DYNAMICS-Adapter 



Hill 




„feuert" der High Score auch am Texas 
Instruments TI 99/4a und am Coleco 
Vision. Die Bewegungsfreiheit am 
Bildschirm kann für alle Geräte durch 
das 2 m lange Verlängerungskabel von 
DYNAMICS noch erhöht werden. 
Für den TI 99/4a und den Schneider 



CPC 464 noch einen interessanten 
Hinweis: für beide Geräte gibt es einen 
Y-Adapter für Joysticks, so daß an 
diese für nur einen Joystick ausgestat- 
teten Geräte zwei Joysticks ange- 
schlossen werden können, die ge- 
trennt operieren. 



Sinclair-Spectrum 
BTX-fähig 

Wer ein BTX-Fernsehgerät mit Fern- 
bedienung besitzt, kann den Sinclair- 
Spectrum oder -Spectrum+ für BTX- 
Kommunikation einsetzen. Ein BTX- 
Interface verwandelt den Spectrum in 
eine alphanumerische Tastatur, die 
zum BTX-Dialog erforderlich ist. Eine 
zusätzliche Tastatur wird nicht benö- 
tigt. 



Das BTX-System wird mit dem Spec- 
trum oder Spectrum+ gesteuert. Mit 
den Tasten des Computers lassen sich 
Seiten abrufen, Seiten speichern, Mit- 
teilungen versenden, Seiten aus dem 
BTX-Netz verändern und BTX-Texte 
ausdrucken. 

Zusätzlich können in Verbindung mit 
dem Sinclair-Microdrive häufig betä- 
tigte Tasten gespeichert werden. Zum 
Beispiel lassen sich oft benötigte Sei- 
ten über eine Art Kurzwahl automa- 




tisch anwählen. Bei der täglichen Kon- 
trolle der Kontoauszüge beispielswei- 
se werden die Verbindungszeiten zur 
Zentrale verkürzt und Telefongebüh- 
ren gespart. Sinclair Research Ltd., 
Niederlassung Deutschland, Hessen- 
ring 83, 6380 Bad Homburg v.d.H. 



Sinclair-Spectrum an 
Monitor anschließbar 

Mit einem neuen Video-Interface, das 
einfach hinten auf den Sinclair-Spec- 
trum oder -Spectrum+ aufgesteckt 
wird, ist jetzt der Anschluß an jeden 
handelsüblichen Schwarzweiß- oder 
Farbmonitor mit Videoausgang mög- 
lich. 

Bisher haben findige Freaks zu diesem 
Zweck den Computer aufgeschraubt 
und Änderungen an der Platine vorge- 
nommen. Nachteil: bei diesen Mani- 
pulationen entfiel natürlich die Garan- 
tie. Das Video-Interface ist zum Preis 
von 69 DM (inkl. MwSt.) zu haben. 
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Computer-Handbuch 
A-Z 

Das Begriffs lexikon für den Benutzer 
von Mikroprozessoren und Personal 
Computern. 



Für das Verständnis von Bedienungs- 
anleitungen und einschlägigen Fach- 



störungsfreie Kommunikation im ^ 
praktischen Umgang mit seinem Gerät * 
ist es ein „must" für den Anfänger. tK 
Das Begriffslexikon wird wesentlich "f 
erweitert durch zahlreiche Artikel zu ^J 
Sonderthemen aus dem Umfeld des w. 
Home Computers. Die Information in ^ 
diesen Artikeln ist praxisbezogen, +c 
vielseitig und allgemein verständlich. -+c 
Sie reicht von der Wartung des Gera- ■£ 
tes über Zubehör und Anwendung bis J 
zu Problemen in der Beziehung zwi- C 
sehen Personal Computer und Benut- ± 
zer. +t 

Computer Compact, Goldmann Verlag, -fc 
München. ^ 




Programmieren in Assembler 



Ein Buch, in dem einige der neue- 
sten „Werke" über die Maschinen- 
sprache-Programmierung des 
6502 - Mikroprozessors (im VC- 
20) und des dazu kompatiblen 
6510 - Prozessors (im C-64) ihr 
Vorbild hatten, ist „6502 - Pro- 
grammieren in Assembler" von 
Lance A. Leventhal. 

Diese Ausgabe ist sicher kein Lehr- 
buch für BASIC-Programmierer, die 
sich nun der schnelleren Maschinen- 
sprache zuwenden wollen. Bereits auf 
den ersten Seiten erfährt der Leser, 
daß die Inhalte des Buches „Einfüh- 
rung in die Mikrocomputertechnik" 
(von Adam Osborne) als bekannt vor- 
ausgesetzt werden. Diese Kenntnisse 
muß man nun nicht unbedingt durch 
Lektüre des genannten Buches erwer- 
ben, aber ein blutiger (Programmier-) 
Anfänger sollte man nicht mehr sein, 
um das Buch von Leventhal verste- 
hend lesen zu können. Die bereits vor- 
ausgesetzten Kenntnisse betreffen die 
allgemeinen Eigenschaften von Mi- 
krocomputern, und dabei insbesonde- 
re den Befehlssatz der Assemblerspra- 
che und deren Adressierungsarten. 

Das erste Kapitel (mit dem irreführen- 



den Titel „Einführung in die Assem- 
blerprogrammierung") beschreibt den 
Aufbau und die Vor- bzw. Nachteile 
von Assemblerprogrammen. Auch 
eine Betrachtung, für welche Problem- 
stellungen eine Programmierung in 
dieser maschinennahen Sprache über- 
haupt sinnvoll ist, fehlt nicht. Im näch- 
sten Kapitel des Buches beschäftigt 
sich der Autor mit „Assemblern", (hier 
sind diesmal die Quellprogrämme ge- 
meint, die in Assembler in den soge- 
nannten „Objektcode" übersetzt wer- 
den, welcher dann das eigentliche Ma- 
schinenprogramm darstellt). 

Das Herz des Buches ist für mich das 
dritte Kapitel, wo auf über 120 Seiten 
der Befehlsatz des 6502- (65 10-) Mi- 
kroprozessors beschrieben wird. Je- 
der Befehl wird mit seiner Wirkung 
aufgeführt, wobei auch auf die mögli- 
chen Adressierungsarten und die Be- 
einflussung der verschiedenen „Flags" 
eingegangen wird. Durch graphische 
Darstellungen wird das Gesagte teil- 
weise noch verdeutlicht. 
Der Schlußteil des Buches befaßt sich 
mit Problemen (und deren Lösungen!), 
wie sie im Laufe der Entwicklung von 
Programmen immer wieder bewältigt 
werden müssen, also z. B. Programm- 
schleifen, arithmetische Aufgaben, 



Tabellen und Listen usw. Außerdem 
wird zum Schluß noch ein Kapitel dem 
Thema der Software-Entwicklung ge- 
widmet, wobei auch Begriffe wie „mo- 
dulare Programmierung" und „struk- 
turierte Programmierung" angespro- 
chen werden. Begriffe, die sonst nicht 
im Zusammenhang mit Assemblerpro- 
grammen gebraucht werden. 
Zusammenfassend gesagt ist dieses si- 
cher nicht einfach zu lesende Buch ein 
nützliches Hilfsmittel für diejenigen 
Maschinenspracheprogrammierer, die 
Programme mit System, möglichst effi- 
zient (= schnell und Speicherplatzspa- 
rend) und für andere Programmierer 
relativ durchschaubar erstellen möch- 
ten. Für diesen Personenkreis hat das 
Buch auch nach der einmaligen 
Durcharbeitung durchaus als brauch- 
bares Nachschlagewerk seinen Zweck 
erfüllt, obwohl das fehlende Register 
stört. Doch wird dieser Mangel durch 
ein ausführliches Inhaltsverzeichnis, 
die Verwendung verschiedener 
Druckarten zur Hervorhebung von 
Textteilen und durch die Angabe von 
Stichwörtern am Rande der Texte teil- 
weise wieder ausgeglichen. Alles in 
allem ist dies ein Exemplar der geho- 
benen Preisklasse für Computerbesit- 
zer mit gehobenen Programmieran- 
sprüchen. 

von Lance A. Leventhal 
te-wi-Verlag GmbH München 

************-¥■-¥■-¥•**** 




Dieses Buch ist ein Stück bester ameri- 
kanischer Publizistik. Es vermittelt 
fungiertes Wissen durch spannende 
Erzählung. Die Geschichte der Mikro- 
elektronik - je mehr wir darüber wis- 
sen, desto schneller finden wir den 
Anschluß. 

Heyne Computer-Bücher, Best.-Nr. 15/3, 
DM 12,80 Originalausgabe 
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REM ******************************** 
REM * * 

REM * VORPRUÜRHMIi EUER JET-PflC * 
REM * * 

REM *********************** 

PÜKE631 .. TS ■ PÜKE632, 111 : P0KE633.. 13 : PÜKE 198, 3 
P0KE44, 48 : PÖKE4ö*2S6jß : NEW 
REM ******************************** 
1 * * 

Pfl 1 H T E R (VORPROGRAMM)* 
(DISKETTE) * 
VON * 

THOMHS üÜESMRNN * 

RH KLÜCKEN KAPELLE 16 * 
5778 MESCHEBE * 

TEL 0291/8197 * 



REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 



* 



* 



R E M * * * * * * * * * * * * * * * * * ******** * * * * * * * 

RR i NT " 3P0KE44 .- 48 = P0KE4S#256 , ; NEW " 

PR 1 NT " JSÖPLQA'JD " CHR$ ( 34 ) " JE'I -PRO " CHR$ < 34 > " , 8 " 

PR'iN'i '"JSMeHSRUN" 

PÜKE 1 98 .. 4 ; P0KE63 1 , 1 9 ■ PÜKE632 .-13 : P0KE633 .• 1 3 : PÜKE 

634.. 13 
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Sie leiten eine Expedition, die die Auf- 
gabe hat, 4 unbekannte Planeten zu 
erforschen. Natürlich verbraucht Ihre 
Rakete Treibstoff. Deshalb werden Sie 
von „Mister Spock" zu den 4 Planeten 
„gebeamt", um dort 6 Treibstoffpakete 
einzusammeln, die dort nacheinander 
vom Himmel fallen. 
Nach Beendigung dieser Aufgabe setzt 
Ihre Rakete zur Landung an. Wenn Sie 
zu einer neuen Expedition aufbrechen 
wollen, stellen Sie sich am Fuß der 
Rakete auf und der neue Countdown 
läuft. 

Bei der Erforschung der fremdem Pla- 
neten haben Sie sich recht seltsamer 
Lebewesen zu erwehren, z. B. nieder- 
gehender Asteroiden, patroullieren- 
der UFOs, seltsamer dreikugeliger 
Wesen oder Kamikaze-Raumschiffen. 
Deshalb sind Sie mit einem wirksamen 
Protonenlaser bewaffnet, um diese 
Wesen zu zerstören und Punkte zu 
sammeln. Gelingt Ihnen das nicht und 
Sie werden von einem Wesen berührt, 
ist eines Ihrer drei kostbaren Leben 
verwirkt. 

Laden und Abspeichern: 

Tippen Sie das Programm JET-PAC 1 
ab, SAVEN Sie es - STARTEN Sie. 
Tippen Sie nun das Hauptprogramm 
ein (Jet-Pac 2), speichern Sie es hinter 
Jet-Pac 1 auf. Ihrer Kassette ab. Zum 
spateren Laden drücken Sie nur 
SHIFT und RUN. 

Einige Besonderheiten: 

Das Programm bedient sich überwie- 
gend der Maschinensprache. Dadurch 
ist das Spiel äußerst schnell. Die 
Steuerung erfolgt deshalb über Joy- 
stick (Port 2). 
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1 REM ************^ 

12 RE.11 % * 

14 REM * J E i "- P R C * 

16 REN # * 

18 REH * BV * 

2Ö REM % THOMAS ÖÜESMANN * 

22 REM * AN (CLOCKEN KAPELLE 16 * 

24 REM # * 

26 REM !|Hi8##***#####***##H5#^#*H*ä|öM8^## 

30 V-53248 : S 1 ~542 r ? 2 : C8»S3732 : H I «0 „ 

4M PRINT'UT ^0^+22* 216 :PGKEV+32,0:pOKEV+33*0 : FOKEV+d5, ?:P0KE'/+,*:4**.l 

45 P0KEV+3?,2:PÜKEV+38, l:pOKEV+2i*0;FORfWBnO8I+24-.POKEfl ; 0:NEXT 

60 ii I MV 1 «T 1 5 J = BI MV2 < 1 5 ) : FÜRH~8TÜ 1 5 : READ V 1 ( A > : NEXT : FQRA-0 TU 1 5 ; REH JJ >U '-. H > ■ NEXT 

m PDKEäfi4/i5:SVSC8.-PRlNT ,, aBITTE WARTEN,». DATEN WERDEN EINGELESEN" 

65 FDRft«0TQ 115 : RERDiß : POKEA+69 1 2,1- NEXT : FORR*0TQ 1 28 : READE : P0KE7 1 68+fi t B ; NfcftT 

90 FÜRft*4096 f06 .-'36 : REBBfifi : POKEA , DA ; P 1 =P 1 +BA : NEXT 

95 I F P 1 <>3 1 803? i HENPR 1 NT " FEHLER I N MflSCH I NENCODE-DHT AS " : STOP 

1 08 OO3UB5000 : POKEV+24 , 1 9 

im 8C=0 : L1*3:RU«0 : LE*0 : PÖKE49249*8 __ __,,__, 4r . r 

1 60 POKES I •+• 1 , 5 : POKES I +5 > ; POKES I +6 , 240 : PGKES 1+15* 18 : POKES I + 1 8 , 1 29 "• POKEo I + 1 3>*W 

1 7B POKES I +20 , 240 ; POKES 1 +22 * 2 : PÜKES 1 +23 , 1 7 : POKES I +24 , 20? 

175 PÜKE49254, : PÜKb.49255, : PÜKE49257, 

285 REN 

290 REM SPIELFtLIiHÜFBAU 

29b REM 

300 PRINT"^" 

305 SC*PEEK ( 49254 > +256*PEEK £ 49255 ) 

3 1 POKES 11,3: P0KE2 14,6: SVSCS : PR I NT " II u r r hr hr hr H " 

315 P0KE211,33:PÜKE214,4:SVSCS:PRINT" h-l-hH" 

320 PÜKE211,2i:P0KE2i4,14:SVSCS:PRINT" »• hrr HH " 

330 POKES i 1 , Ö '• PÜKE2 14,22- SVSCS : PR I NT " t r hr r hr hrrrr hr hr r hr r I- K hrr hrr r i- hrr hr I- 1- hrffl 

340 PÜKE21 1,0: P0KE214, 23 : SVSCS : PR INT "SCORE "SC; 

345 PÜKE2H, 13 : SVSCS : PRlNT"HIGH-SCORE i, HI ; :P0KE21 1 > 31 : SVSCS: PRINT"LIVES ,, LI "ä" 

485 REM 

490 REM SPILL VORBEREITEN 

495 REM 

500 POKEV+2 1 , ; PÜKEV+2Ö , ■ POKEV+ 1 6 , 248 : POKE2040 .• 1 29 : POKE204 1 , 1 32 : PUKE2042 , 1 33 

505 POKEV , 200 : POKEV+ 1 , 206 : POKEV+2 , : POKEV+3 , - : POKEV+4 , : POKEV+5 , 

5 1 POKEV+39 , ? : POKEV+48 , 3 : POKEV+4 1 * 5 

515 P0KE49l59,RiJ:PÜK:E5694,2-LE _ _ (i _._. Lrt _ T 

520 SVÖ6422 : FORA=0TO15 : P0KE49163+A, Vi <R) : NEXT ■ F0RR-8T015 : P0KE49232+H, V2-:.H; : NEXT 

530 F0RA»6T0148TEP2 : PÜKEV+A, I NT C C RNIl < 1 > *1 50+88 >/2>#2 : NEXT 

535 FÜRA-7TÜ15S TEP2 : POKEV+A, INT<RND< 1 >*160>+50 : NEXT 

540 IFRUO0THEN6y0 

550 POKEV+42 , 2 = POKEV+43 > 8 = PÜKEV+44 , 2 : P0KEV+45 > 8 ; POKEV+46 , 2 

56Ö PORA"- : 2043TÜ2047 : PÜKEA, 134 : NEXT 

600 IFRUO1THEN650 

6 1 POKEV+42 ,14: POKEV+43 , 1 : POKEV+44 , 1 4 - POKEV+45 , 1 : POKEV+46 ,14: POKEV+28 , 248 

620 PÜRA~2043TO204 .■' : POKEA , 1 35 : NEXT 

650 IFRUO2THEN708 , , _ _ _ ,..-,.,-,, - - - „- 

666 POKEV+42 .• 1 : POKEV+43 ,10: PÜKEV+44 ,10: POKEV+45 ,10: POKEV+46 , 1 W ■ PUKE v'+28 , 248 

6?0 FÜRA-2043 f'Ü204? : POKEA, 136 ; NEXT 

700 IFRUO3THEN750 

710 POKEV+42, 3 : POKEV+43, 3 : POKEV+44, 3 : POKEV+45* 3 = POKEV+46.. 3 : POKEV+28, 248 

720 FÜRA-2043TD2047 = POKEA , 13? : NEXT r - . , . r - - T , , - .-,.-, 

750 PÜKES 1+11,0: POKEV+2 1 , 1 : PÜKES 1+12,10: POKES I + 1 3 , : PÜKES I +8 , 30 : POKEo 1+11*12^ 

f'55 FORft*0TO2000 : NEXT : POKESI + 1 1 , : POKEV+2 1 , 255 

985 REM 
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990 REM SP I ELANFANG 

995 REM 

1008 SV84096 

1010 IFPEEK<2040>*i38THEN1580 

1015 1 FPEEK < 2847 ) ■ 1 4 1 THEN2000 

1820 STOP 

1485 REM 

1490 REM LEBEN VERLOREN 

1495 REM 

1 508 POKE V+28 , PEEK < V+28 > ÜR 1 

1 583 POKES 1 +4 , ö : Füftfi*0TÜ200 : NEXT = POKE V+2 1 , PEEK < V+2 1 ) AND2S4 

15Ö5 PüKESl + il..0:PÜKESI+i2,i3:POKESl + 13,0:POKESI+8.«2-POKESI+ii,129 

1588 FORA*0TO2000 • NEXT : POKES 1 + 1 1 , :.LI-LI-1 : IFLIO0THEN385 

1510 POKE V+2 1 1 : PÜKE2 11,15 = PÜKE2 1 4 ', 9 ■ 8 VSCS : PR I NT " AHME QVER " 

1515 SOPEEKC49254>+256*PEfcK<49255> : 1FSCOHITHEN1538 

1520 Hl«SC:PRINY"*feIE HABEN BEN NEUEN HIGHSCORE VON" =PR1NTH I" PUNKTEN ERREICHT" 

153Ö PR 1 NT ,l »WOLLEN SIE NOCH EINMAL SPIELEN ? <J/H? U ■ POKE 198,0 

OEt A* = I F A*k » J « THEN 1 50 

I F A*= " H " THENPR I NT » 3" : STOP 

GOTO 1535 

REM 

REM ' RUNDE BEENDET 

REM 

PÜKE21 1,0-' P0KE214, 8 : SVSCS : PRI NT "HflUSGEZE ICHNET ! " 

PR 1 NT " ABRUNDE " RU+ 1 " I N LEVEL " LE+ 1 " HABEN S I E GESCHAFFT " 



1535 
1540 
1545 
1985 
1990 
1995 

2088 

2810 

202Ö 
2Ö30 
2040 
4985 
4990 
4995 
5000 
5010 
5020 
5030 
5040 
5050 

5060 

50?0 

5160 

5110 

5120 

5200 

5205 

5210 

5220 

5225 

49985 

49990 

49995 

50Ö0Ö 

58019 
50985 
50990 
513995 

51800 

51065 

31010 

51615 
51028 



0:POKE214/6:SVS58732 



P0KE49249,0:RLHRU+1 

IFRU-4THENRU-0 : IFLE»0THENLE 

FORR»0TÜ2000 = NEXT : GÜT038Ö 

REM 

REM VORSPIEL 

REM 

SVS6525'-PGKE211 

PRlNT n HiMa r,k 

PRINT"»«!! I Ik 

PRINT"Üi»lri f (k 

PRINflüia^ ! ik 

PRXNT"liitni '-* Ik 

PRINT l, »iR1 , *-^k 

PRINT7ABC9>"fiSWVÜN 



»LE+1 SPRINT "MUND DAMIT LEVEL "LE+l" ERREICHT 1 





k 

k 

k'-' 
HON AS GOESMANN" 

POKESI+24/0:pÜKESI+4/0:POKESI+lli0:POKEÖI+18/0iPOKESI+5^9:POKESI+S^0 
POKES1+12,9:POKESI+13,0:POKESI+24,15 
PÜKE49232, 1 : PÜKE49233, 8 : P0KE49234, 1 = P0KE49235, 
SV86576 : FORHK0TO39 : READAD : RDR*2848+RD*8 
FÜRB-0TÖ7 : REAllDA.: PÖKEADR+B .. DA : NEXT : NEXT 
FOR A»0TO64* 15-1: re ADD A = POKEA+8 1 92 , DA = NEXT 
PRINT".«k BITTE DRUECKEN SIE EINE TASTE 
POKE 1 98 .« 8 = m I T 1 98 1 i : PR I NT " 3" • RETURN 

REM 

REM DAT AS FUER MASCHINEHCODE 

REM 

DATA?, 4, 5, 7, 5, 5, 5, 5, 2,2,2, 8, 6, 4, 8, 6 

DATA?, 4, 6, 7,18,8,9,8, 12, 10, 18, 18,15,13,15,17 

REM 

REM DA! AS FUER MUSIK 

REM 

DATA183, 17,32, 189, 16, 16, 183, 17, 16, 183, 17,32, 189, 16, 16, 183, 17, 16,59,23,32 

DATA237, 21, 16, 59, 23, 16, 287, 34, 64, 3, 31, 32, 69, 29, 16, 28, 26, 16, 69, 29, 32 

DATA28, 26, 32, 59, 23, 32, 237, 21, 16, 137, 19, 16, 237, 21, 32, 137, 19, 32, 183, 17, 32 

DATA189, 16, 16, 103, 17, 16, 103, 17,32, 189, 16, 16, 183, 17, 16,59,23,32,237,21, 16 

DATAS9, 23, 16,18,39, 32, 287, 34, 32, 3, 31, 32, 157, 24, 16, 28, 26, 16, 69, 29, 32 



Computronic 



Coimna 



3ore6* 



51025 
31188 
51185 
51118 
51115 
51120 
51125 
51138 
51985 
51390 
51995 
52880 
52001 
52802 
520Ö3 
52884 
52865 
52886 
52007 
52888 
52009 
52016 
528 1 1 
52912 
528 13 
52014 
52815 
52816 
520 1 7 
52818 
52819 
52028 
52821 
52822 
52823 
52824 
52Ö25 
52826 
52627 
5^828 
52829 
5283Ö 
52031 
52832 
52833 
52834 
52835 
52836 
5283? 
52833 
52839 
52840 
5284 1 
52Ö42 
52843 
52844 
52845 
52846 
52847 
52Ö48 
52649 



BATA28 .. 26 , 32 , 59 , 23 , 64 , 59 .. 23 , 32 , 8 .. 255 ' 

DATA 158, 1 1 , 16, 162, 14,48, 18, 13, 16, 129, 15,48, 162, 14, 16, 183, 17,48, 196,9, 16 
)RTRi62, 14, 16, 78, 12, 16, 196, 9, 16, 18, 13, 16, 129, 15, 16, 196,9,32, 180.. 8, 32 
BRTA247, 10, 32, 158, 11 , 16, 162, 14, 16, 180,8,32, 18, 13, 16, 129, 15, 16, 188,8, 16 
BATR129, 15, 16, 158, 1 1 , 16, 162, 14,48, 18, 13, 16, 129, 15,48, 162, 14, 16, 103, 17,48 
BATA196,9, 16, 162, 14, 16, 78, 12, 16, 196,9, 16, 18, 13, 16, 129, 15, 16, 196,9, 32 
BATA188,8, 32, 196,9, 16, 247, 18, i6, 158, 1 1 , 16, 183, 17, 16, 162, 14, 16, 193, 17, 16 
DATA 158, 11,82 
REM 

REM N-ÜÜBE 

REM 

BATA173, 31 i 208/ 169, 2, 141, 96, 192, 169, 3, 141, 8,192, 169, 255, 141, 2, 228, 169 
BATA8, 141, 1,192, 173, 0,228, 168, 41, 2, 288, 6, 169, 255, 141, 2, 228, 234, 173, 8, 228 
BATA41, 1,268, 3, 32, 216, 16, 173, 6, 228, 41, 4, 268, 3, 32, 189, 17, 173, 8, 228, 41 
BATA8, 288, 3, 32, 41,17,173,0,228, 41/ 16, 288, Z> 32, 288, 17, 173, 1,192, 288, 3 
BATA32,247, 16,32,38, 18,32, 155, 18,32, 189,28,32,84, 19, 173, 13, 192,248, 1 
II AT A96 , 1 73 , 98 , 1 92 , 288 ,6,32 , 49:. 22 , 32 , 224 , 28 , 32 , 27 , 24 , 1 73 , 99 , 1 92 , 248 , 3 
BATR76, 22, 25, 76, 18, 16, 8, 173, 16, 288, 41, 1,288, 56, 173, 8,288, 201, 31/ 144, 21 
BATA281, 136, 17b, 17, 173, 1 ,288', 281,78, 144, 18,281, 106, 176,6, 169, 1, 141,3 
JJATR192, 96, 173, 8,288, 281, 175, 144, 28, 281, 248, 176, 16, 173, 1,288, 281, 142 
BATA144, 9, 281 , 1 ?8, 176, 5, 169, 1 , 141 , 3, 192, 96, 173, 8, 288, 281 , 15, 144, 16, 173 
BATA1, 288, 201, 62, 144, 9, 281, 98, 176,5,169, 1,141, 3, 192, 96, 173, 1,288, 281 
BATA58 , 283 , 1 , 96 , 286 , 1 , 288 , 32 , 1 82 , 1 7 , 32 , 1 29 , 1 6 , 1 73 , 3 , 1 92 , 248 , 3 , 238 , 1 , 288 
BRTR163, 1,141, 1,192, 96, 32, 38, 17, 32, 38, 17, 169, 8, 141, 4, 212, 173, 1,288, 281 
BAT A20? , 288 , 1 , 96 , 233 , 1 , 288 , 32 , 1 29 , 1 6 , 1 73 , 3 , 1 92 , 248 , 8 , 286 , 1 , 288 , 1 69 , 8 
BRTR141, 3, 192, 96, 162, 4, 168, 8, 136, 288, 253, 282, 288, 258, 96, 173, 16, 288, 41 
BATA1 , 248.. 8, 1 73, 8, 288, 281 , 64, 288, 1 , 96, 169, 129, 141 , 248, 7, 169, 1 , 141 ,2, 192 
BATR1 73, 1, 192,288,3,32, 182, 17,238,8,288,288,8, 173, 16,288,9, 1, 141, 16,288 
BRTA32, 129, 16, 173,3, 192,248,3,286,8,288, 169,8, 141/3, 192, 169, 1, 141, 1, 192 
HATA96, 173, ifo, 288, 4i , 1 , 288, 8, 173, 8, 288, 201 , 24, 288, 1 , 96.. 169, 131 , 141 , 248 
BAT A? , 1 69 , 255 , 1 4 1 , 2 , 1 92 , 1 73 ,1,1 92 , 288 , 3 , 32 , 1 82 , 1 7 , 286 , 8 , 288 , 1 73 , 8 , 288 
BRTA281, 255, 208, 8, 173, 16, 288, 41, 254, 141, 16, 288, 32, 129, 16, 173, 3, 192, 248 
BRTR3,238,8,288, 169,8, 141,3, 192, 169,255, 141, 1, 192,96, 169, 129, 141,4,212 
BATA286 , 248 , 7 , 32 , 38 ,17, 238 , 248 , 7 , 32 , 38 , 1 7 , 96 , 1 73 , 4 , 1 92 , 248 , 1 , 96 , 1 73 , 98 
Bft"FR192,208,258, 173, 16,288,41,253, 141, 16,288,41, 1,248,8, 173, 16,288,9 
BATA2, 141, 16,288, 169, 1, 141,4, 192-, 169,48, 141,6, 192, 173,2, 192, 141,5, 192 
BATAl 73, 8, 298, 141, 2, 288, 173, 1,288, 141, 3, 288, 169, 0,141, 11, 212, 141, 12, 212 
BATA169, 224, 3.41, 13,212, 169,64, 141, 188, 192, 141,8,212, 169,33, 141, 11, 212- 
BRTR96 , 1 73 ,4,1 92 , 288 , i , 96 , 1 73 , 1 08 , 1 92 , 56 , 233 , 4 , 1 4 1 , 1 88 , 1 92 .« 1 4 1 , 8 , 2 1 2 
BRTR201, 16, 288, 5, 169, 0,141, 11, 212, 162, 4, .173, 5, 192, 281, 1,248, 46, 173, 16 
BATA208, 41 , 2, 288, 17, 173, 2, 208, 208, 12, 169, 0, 141 , 3, 288, 141 , 1 1,212, 141 , 4 
ÜRTA192,96,286,2,288, 173,2,288,281,255,288,8, 173, 16.« 288, 41, 253, 141, 16 
DRTR208 , 282 , 288 , 284 , 96 , 1 73 , 1 6 , 288 ,41,2, 248 , 1 9 , 1 73 , 2 , 288 , 28 1 , 88 , 288 , 1 2 
BATR169, 8, 141, 3, 288, 173, 11, 212,141,4,192, 96, 233, 2, 288, 288, 8, 173, 16, 288 
BRTR9,2, 141, 16, 288,282,288, 161,96, 169,8, 141,8, 193, 162,8,24, 173, 16,288 
BATA45/8, 193,248, 1,56, 189,6,288, 186, 141, 1, 193, 173, 16,288,41,2,74,74, 173 
BATA2 , 288 , 1 86 ,141,2,1 93 , ?S , 213,18,1 73 , 8 , 1 93 , 24 , 1 89 , , 1 93 , 1 4 1 , 8 , 1 93 , 232 
BATR232 , 224 , 1 8 , 288 , 206 , 96 , 1 72 , 7 , 1 92 , 1 73 ,1,1 93 , 56 , 249 ,16,192, 205 , 2 , 1 93 
BATfii?6,39,173, 1,193,24,121/28,192,285,2,193,144,27,189,7,288,56,249 
BRTR24, 192,205,3,208, 176, 15, 189,7,288,24, 121,28, 192/285,3,288, 144,3,76 
BATA14, 19,76, 196, 18, 169,8, 157,64, 192, 138,74, 178, 169, 138, 157,251,7, 173 
BRTA23, 288, 13, 8,193,141,28,288, 189, 42, 203, 141; 12, 192, 169, 8, 157, 42, 288 
BRTA169, 8,141, 3, 288, 169, 0,141, 4, 192, 169, 8,141, 11, 212, 1.41, 13, 212, 169, 9 
BATA141, 12,212, 169,2, 141,8,212, 169, 129, 141, 11,212, 141, 185, 192,96, 169 
BATA8, 141, 11, 192, 162,8, 142,3, 192, 189,64, 192,281,25*5,248,21,222,64, 192 
BRTR288, ib, 169,255, 157,64, 192,234,234,234, 138,74, 141, 18, 192,32, 136, 19 
BAT A 1 4 , 1 1 , 1 92 , 1 M , 8 , 1 92 , 232 , 232 , 224 ,18, 234 , 288 / 2 1 2 , 96 , 1 73 , 98 , 1 92 , 288 
BRTA72, 173,7, 192,288,68, 174, 18, 192, 173, 12, 192, 157,42,288, 169, 134, 15? • 
BRTR251,?, 174,8, 192, 173,27,212,281,288, 144,3,56,233,48, 157,7,288, 173 
BftTR16,288, 13, 11, 192, 141, 16,288, 169,96, 157,6,288, 169,255,56,237, 11, 192 
BATR141, 8, 193, 173, 28, 283, 45, 8, 193, 141, 28, 288, 169, 25, 32, 216, 24, 96, 174 
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52050 
52öS i 
52Ö52 
52053 
52054 
52655 
528.56 
5205? 
52058 
52059 
52068 
52061 
52062 
52S63 
52864 
52065 
52Ö66 
5206? 
52068 
52069 
52078 
52071 
52072 
52073 
52874 
52075 
52076 
52077 
52078 
52079 
52080 
52081 
52082 
52k!83 
52084 
52085 
52086 
52087 
52088 
52089 
52096 
52091 
52092 
52093 
52094 
52095 
52096 
52097 
6^898 
52099 
52180 
52101 
52102 
52103 
52104 
52105 
521B6 
5210? 
52108 
52109 



BRTR18, 192.. 173,7, 192.201.. 1,208. 10, 16'9, 135, 157.251.7. 169,50,32,216.24 
BRTR173, 7, 192,201, 2, 288. 18, 169, 136. 157. 251, 7. 169, 88, 32, 216, 24, 173, 7. 192 
BRTR28i, 3, 208, 10, 169, 137, 157. 251. 7. 169, US, 32, 216. 24, 173. 16. 208. 13. 11 
BRTR192, 141.16,203. 173. 12. 192. 157.42.298. 173.27.212.201. 160. 144,3.56 
BRTR233. 9b, 24, 105,48. 174,8, 192. 157.7.288. 169.254, 157.6,208. 169, 1, 157 
BRTR32, 192, 173/7, 192,201,3,240. ib. 173.27.212.234.48.» 10. 169.80, 157.6.208 
BRTR169, 129. 15?, 32. 192. 173, ?. 192. 201 . 2. 240. 1 . 96. 169. 1 , 157, 48. 192. 173 
BRTR27, 212,234, 234, 234. 234, 234. 18b. 48. 5. 169. 129. 157.48.192.96.173.98 
BRTR192.208.99. 169,8. 141.0. 193. 162,0.24. 173. 16.208. 45.0. 193.24,0. 1.56 
BRTR189,6,2Ö8. 106. 141. 1, 193. 173. 16.208.41. 1.234. 74. 173.0.208, 106, 141 
BRTR2. 193. 172.7. 192. i?3. i. 193. 56.249.89. 192.205,2. 193. 176.47, 173. 1. 193 
BRTR24. 121.84. 192,205,2. 193. 144,35. 189.7.208,56,249.88. 192,205. 1.208 
BRTR176, 23. 189. 7, 208. 24. 121 . 92. 192. 205. 1 . 268. 144. 1 1 , 169. 138. 141 . 248. 7 
ÜRTR169. 255. 141. 13. 192,96. 14,0. 193.232,232.224, 10,208." 154,96.206.9, 192 
BRTR240, 1 , 96, 169, 3. 141 , 0, 192. 173, 14, 192. 208, 49, 296, 15, 192, 240. 1 . 96. 165 
BRTR162.201.32. 176.3.24. 105.32,201.232, 144.3.56,233.24. 141.4,208, 169 
BRTR0, 141, 5, 208, 173, 21. 208, 9. 4. 141. 21. 208. 169. 1.141. 14. 192.169.255.141 
BRTR15, 192.9b. 173.0. 193.41.4.240.5. 169; 255. 141. 14. 192. 173. 14, 192.201 
BRTR255. 240. 3, 238. 5. 208. 173. 4. 208. 168, 56. 233. 10. 205. 0,208.« 176.89.152 
BRTR24. 105, 15,205,0,208, 144,80, 173,5.298. 168.56.233. 13.205. 1.208. 176 
BRTR68. 152.24. 105, 12,205.1.208, 144.59. 173.21.208.41.251.141.21.208.169 
BRTR0. 141.11.212.141. 13.212, 169. 9, 141 . 12. 212. 169. 50 . 141 , 8. 212. 169. 33 
BRTR141.il, 212,169.0.141. 14. 192.238. 97, 192. 169. 108, 32. 221. 24. 173. 97. 192 
BRTR281, 6, 288, 8, 169, 1,141, 98, 192, 32. 181. 23, 96, 189, 32, 192. 48. 33. 254. 6 
BRTR208.254,6,208, 173. 16.208.45. 11. 192.208. 17/ 189.6.208.208. 12. 173. 16 
BRTR208. 13. 11. 192. 141. 16. 288. 76. 2i5. 21. 173. 16. 288. 45, 11. 192. 240. 14, 189 
BRTR6, 208, 208. 9, 173, 16, 208, 45, 1 , 193. 141 . 16, 208. 173. 16.. 208, 45. 1 1 , 192. 240 
BRTR21. 189. 6. 208.201.80,208. 14. 169. 2. 157. 6. 208. 173, 16,208.45. 1,193. 141 
BRTRlb. 2Ö8. 96. 222. 6,208, 222. 6. 208. 173. 16.208.45. 11, 192.240. 16. 189.6,208 
BRTR20 1.254.208.9. 173, 16.288.45, 1. 193. 141. 16.208. 173. 16.208.45. 11. 192 
BRTR208.21. 189,6.208.201,2. 208, 14. 169.80, 157.6.208, 173. 16.208. 13. 11. 192 
BRTR141. 16.208.96. 17*3, 31 .208. 141,0, 193.206.96. 192,240. 1,96. 169.2. 141 
BRTR96, 192. 169,8. 141. 11. 192. 162.0, 169.255.56.237. 11. 192. 141. 1. 193. 189 
BRTR64, 192, 201 . 255. 208. 61 , 173. 7, 192. 208. 67. 173. 16. 208. 45. 11 . 192, 208. 12 
BRTR189, 6, 208, 201. 2. 208. 5. 169. 16. 157. 64, 192, 222. 6. 208. 222. 6. 208, 189. 6 
BRTR208. 201 , 254. 208. 9. 173. 16, 208, 45. 1 . 193, 141 . 16. 208. 254. 7. 208. 173. 8 
BRTR193. 45. 1 1 , 192. 240. 3. 32. 41 . 23. 24. 14^ 1 1 .« 192. 232. 232. 224. 18. 208, 169 
BRTR96, 173,7, 192,201, 1,208, 40,32, 157,21 , 173,8, 193.45. 11, 192,240, 15, 169 
BRTR132. 56. 253, 32, 192. 157. 32. 192. 32, 157. 21 . 32, 157, 21 . 24. 14, 1 1 . 192. 232 
BRTR232. 224. 10, 248. 3. 76. 73. 22. 96. 173. 7..192. 281 , 2, 288, 37. 32, 157. 21 . 32 

BRTR138.23. 173,8, 193,45. 11, 192.240,9.32. 171.23.32, 138.23,32, 133,23,24 
BRTR14. 1 1 . 192. 232. 232. 224. 10, 240, 3, 76* 73, 22, 96. 32, 157, 21 , 222, 7, 288. 189 
BRTR7, 288, 285. 1,288, 176. 6, 254. 7. 288, 254, 7. 288. 173. 8, 193, 45. 11, 192. 248 
BRTR3, 32. 41, 23, 24. 14, 11, 192, 232, 232, 224. 18. 248. 3. 76, 73, 22, 96, 169, 16. 157 
BRTR64. 192. 142,8. 192. 138. 74, 170, 142. 10, 192. 169, 138. 157.251 ,7, 173,28.288 
BRTR13.1 1,192, 141, 28, 288, 189, 42, 288, 141, 12, 192, 169, 8. 157. 42. 288, 174, 8 
BRTR192.96, 169,8. 141, 11. 192. 162.8. 142.8. 192, 189.112.192.201.255.240.21 
BRTR222. 1 12. 192, 288, 16. 169, 255. 157, 1 12, 192. 234, 234, 234, 138, 74. 141 , 18 
BRTR192.32. 136, 19, 14, 11, 192, 174,8, 192.232.232.224, 18. 234. 288, 212., 76, 84 
BRTR19. 189, 48. 192. 48, 14. 254, 7. 288. 189, 7, 288, 281, 287, 288, 3, 32, 171, 23, 96 
BRTR222, 7,288, 189,7,208,281,32,208,3,32. 171.23.96, 169. 130,56,253,48, 192 
BRTR157.48. 192,96.234.234.234,234, 169.0, 141,7,288, 141,9,208. 141. 11.288 
BRTR141 . 13. 288, 141 . 15, 208, 169, 139. 141 , 253. 7. 169. 148. 141 . 254. 7, 169. 141 
BRTR141 , 255. 7, 169. 1 , 141 , 44, 288, 141 , 45, 288. 141 , 46..28S. 169. 2p5, 141 . 18, 288 
BRTR141, 12, 288, 141, 14, 288. 173, 16,288,41,31,141,16,288,169,8,141.26,288 
BRTR169, 8, 141. 18.212. 169. 188. 141.22,212. 169, 196, 141 ,23,212, 169,31, 141 
BRTR24.212; 169, 18, 141. 15.212. 169. 129.141.18,212.96. 173,98.192.288.1.96 
BRTR48. 108, 169, 8. 141 , 28. 208, 1"73, 15, 208, 281 , 216, 248, 36, 238, 15, 288, 169 
BRTR27. 56, 237, 255. 7, 141, 255, 7. 173, 15, 288. 281, 21, 144, 16, 238, 13, 288, 173 
BRTR13. 208, 281, 21, 144, 6, 238, 11, 288. 173. 11. 208, 96. 173. 181, 192, 281, 129 



Computronic 



52118 
52111 
52112 

32113 
52114 
52115 
52116 

52117 
52il8 

52113 

52121 
52122 
52123 
52124 
52 1 25 

•Je. J,is:.D 

52127 
52128 
52129 
52138 
52131 
52132 
52133 
52134 
52135 
52136 
5213? 
54985 

5499Ö 
54995 
55028 
55038 
55835 
55048 
55855 
55868 
55865 
55878 
55875 
55888 
55885 
55898 
55895 
55188 
55185 
55118 
55115 
55128 
55125 
55138 
55135 
55146 
55145 
55158 
55155 
55168 
55165 
55178 
55175 
55188 



BRTR248.23. 169.. 8.. 141. 18,212.. 169, 12, 141.» 19,212, 169,8, 141 ,28, 212, 169, 129 
BRTR141, 181, 192, 141, 1*3, 212, 173, 1,288, 281, 28?, 288, 19, 173.8,288, 281, 248 
BaiRl44, 12, 173, 8,288, 281, 8, 144, 5, 169, 129,141,98,192,96,234,234,234,169 

ÜRTR8,. 141, 4, 212, 169,8, 141, 18,212, 169.8.. 141, 19,212, 169,248, 141,28,212 

DRTR169, 129, 141, 18, 212, 234, 234, 234, 169, 224, 141, 21, 288, 286, 15, 288, 286 

BRTR13. 288, 286, 11. 288, 169, 27, 56, 237, 255, 7, 141. 255. 7. 32, 38, 17. 32. 38, 17 

BRTR173, 11, 288, 281,- 258, 288, 6, 169, 1. 141.99. 192.96.76, 176,24, 174, 185, 192 

URTR248,56,24, 189, 182, 192, 141, 182. 192, 173, 183, 192> 105.8.. 141. 183. 192; 169 

BRTR144, 133,97, 173, 183. 192, 133.98, 173, 182. 192. 133,99, 169,6, 133,211. 169 ■ 

BRTR23, 133, 214, 138, 72, 152, 72, 32, 188, 229, 32, 289, 189, 184,168,184, 178,169 

BRTfiS, 141, 185, 192,96, 172,97, 192, 169,0, 162,94, 157,7, 192,202,208,258, 149 

DRTR9?, 192, 169,2, 141,22.212. 169. 17, 141,23,212, 169,287, 141,24,212, 169 

BRTR5, 141, 15,212, 169, 129, 141, 18,212, 169,8, 141, 181, 192, 162, 16, 169,255 

DATA 1 5? . 63 , i 92 , 282 , 288 , 258 , 1 62 , 32 , 1 38 , 72 , 1 62 , 32 , 1 68 , 8 , 1 36 , 288 , 253 . 282 

DRTR288 . 258 , 1 84 , 1 78 ,169,1 , 1 57-, 3 1 , 1 92 , 1 73 ,7,1 92 , 28 1 , 3 , 248 , 1 8 , 1 73 , 27 , 2 1 2 

BRTR48.5. 169. 129. 157. 31, 192,282, 288,217, 169, 1, 141,2, 192,96, 169, 127, 141 

BfiTfil4.228, 169,51, 133, 1, 169/8, 133, 139, 133, 141, 169,288, 133, 148, 169,8, 133 

BRTR142, 162,8, 168.8, 177. 139. 145. 141.288.288.249,238, 148,238, 142,282,288 

BRTP248, 169,55, 133, 1, 169, 129, 141 , 14,228. 96 

BBTR 1 69 , 8 , 1 33 , 1 4 1 , 1 69 , 28 , 1 33 , 1 42,1 €S , 8 , 1 33 , 1 39 , 1 69 . 27 . 1 33 , 1 48 , 1 28 , 1 €3 

BRTR285, 141, 28, 3, 169, 25, 141, 21, 3. 88. 96. 286, 88. 192. 173. 88, 192. 288. 41, 169 

BRTR8. 141.4,212, 1^2,81, 192, 177, 139,141,8,212,288,177,139,281.255.208 

BRTR3. 76, 57. 26, 141. 1.212. 288, 177, 139, 141, 88. 192, 169. 33. 141, 4. 212. 288 

BR1R148, 81, 192, 28b, 82, 192, 173, 82, 192,288, 39, 169, 8,141. 11, 212, 172, 83, 192 

DRTR177, 141 . 141. 7. 212. 288, 177, 141 . 281 . 255. 288. 1 . 96. 141 . 8. 212. 288. 177 

BRTR141 , 141 , 82, 192, 169, 33, 141 , 11,212. 200, 148, 83, 192. 165. 203. 281 , 64, 248 

BfiT 83.76,57. 26. 76. 49. 234. 128, 169, 49, 141, 28, 3, 169, 234. 14.1. 21. 3, 88, 169 

BRTR8. 141. 11, 2 12.141.4,212, 76. 49, 234. 8 

REM 

REM BfiTRS FUER ZEICHEN 

REfl 

BR'l'R 189, 255 , 255 , 255 , 255 , 255 , 63 . 1 5 , 1 2 

BR TRI 14, 255, 239, 234, 258, 255, 255. 287. 192 

BRTR187. 255. 255. 171 . 171 , 255, 255, 68, 48 

BRTR12S, 255. 255, 255, 255, 252, 252, 252, 248 i 

BfiTR 1 . 8 . 1 27 . 1 83 . 1 2? , 1 83 , 1 03 , 1 83 , 8 

DRTR2 , , 1 26 . 99 . 1 26 , 99 , 1 26 , 1 26 , ' 

BR TR3 , 8 , 12? ,. 99 , 96 , 96 , 99 , 1 2? , 

BRTR4 . 8 , i 2? , 1 83 , 1 83 . 1 83 , 1 83 , 1 27 , 8 

DR TR5 , 8 . 127.96,1 2 7 , 96 , 127,12 7 , 8 

BRTR6 ', 8 , 1 2? , 96 , 1 27 , 96 , 96 , 96 , 8 

BRTR7.8. 127,96,96, 111, 183, 127,8 

BRTA8, 8, 1 15, 1 15, 127. 1 15. 1 15, 1 15, 8 

BRTR9 , 8 , 56 , 56 . 56 , 56 , 56 , 56 . 8 

BR TR 1 8 . 8 . 12.12,12.12.12 . 68 , 8 

DfiTfi 1 1 . 8 , 1 82 , 1 82 , 1 2? , 1 27 , €? , 6? , 

BR Tfi 1 2 , 8 , 96 , 96 , 96 , 96 . 96 . 1 26 . 8 

BR T R 1 3 , 8 , 1 2? ,91,91,91, 9 1 ,91,8 

BfiTR 1 4 , 8 , 1 2? , 1 83 , 1 83 . 1 83 , 1 83 , 1 83 , 8 

BRTR15, 8. 127, 1 15, 115,1 15, 1 15, 127, 8 

BR Tfi 16,8,1 27 , 99 , 1 2? , 96 , 96 , 96 , 8 

BRTR17, 8, 126, 182, 182, 182, 182, 127,8 

BfiTR i 8 , 8 , 1 2 7 ,99,1 27 , 1 26 , 1 03 , 1 8 3 , 8 . 

BRTR19.8, 127.96, 127,3, 127, 127,0 

BRTR20, 8, 126,24,24,24,24,24,0 

BRTR21,8,115, 115, 115, 115. 115. 127.0 

BRTR22. 8, 115, 115, 115,115,62, 28, 8 

DRTR23> 8, 189, 1.89, 189, 189, 189, 127, 8 

BfiTfi24,0; 115, i 15, 62, 183, 183, 183,8 

BRTR25. 8, 115. 115, 127, 24. 24, 24.8 

BRTR26,8. 127,3,28,96, 127, 127.8 
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55288 
bS295 
55218 
55215 
55228 
55225 
5523Ö 

5524Ö 
55245 
56985 
56990 
56995 
57808 
57885 

5/0X0 

57050 
57855 
5r'0b0 
57108 
57105 
37110 
57150 
57155 
57160 
57200 
57205 

57255 
57260 
573Ö0 
57305 
57310 
57350 
57355 
57360 
57400 
57405 
57410 
57450 
57455 
57460 
57500 
57505 
57510 
57515 
57550 
57555 
57560 
57600 
5 f 605 
57610 
57615 
57650 
57655 
57660 

5??0S 

57705 
&?710 



BRTH48 ..0/1 27 .. 99 > 1 03 . 1 03 .- 1 03 .. 1 27 .< 

DR'i 'R49 , , 56 , 24 , 24 , 24 .. 60 , 60 .. 

BRTR50 .. .. 1 27 .- 3 . 1 27 .. 96 , i 27 , 1 27 .. 

DB T fi 5 1 , , 1 26 .- 6 .- 1 27 , 7 .■ 1 2 7 .. 1 27 .. 8 

Hfi'!"B52 .■ f 99 .. 99 .■ 1 27 .. 3 .■ 3 .. 3 / 

BRTR53 .. 8 / i 27 .. 36 .- 1 27 .-3.-1 27 .. 1 27 , 

DR FH54 , , 1 26 .■ 96 ■ 1 26.-99.. 1 27 , 1 27 .* 

DRTR55 .' 6 .■ 1 2 7 .■ 3 .< 6 .> 1 2 .. 24 .. 24 .« 

.DR 1 RS 6 • , 6 2 , 3 4 .. 1 27 .. 99 .• 1 2 7 .- 1 2 7.0 

BRTR57 ..0.1 27 / 99 . i 27 .. 3 , 3 , 3 . 

REH 

R E M DR i" Fl S F Ui~ R S P R I T ES 

REM 

BRTRi/ 224/0. -3.. 123/0/11/ 120/0; 11 . 134/0.- 11 - 184/ 0-25« 240. 0/28 '0/0.- 20/ 246.-0 

DR"!' R29 .. 1 55 ..0/21/ 155 . .- 29 .. 1 55 / / 21 . 1 35 / 1 92 .- 28 / 248 .. , 14 / 240 . - 6 / 1 26 .- 

BRTR 1 5 / 1 26 / .. 3 1 / 6 .. .. .. 6 .. .- 1 5 .- 7 .■ .. 25 - 7 .- 1 28 ■ 1 1 . .. 8 .. 6 

BRTR 1 . 224 .. .. 3 . i 28 .■ 8 . 1 1 .. 1 28 .. 8 .. 1 1 . 1 84 . 8 . 1 1 . 1 84 . 8 . 25 . 240 .. .. 28 .. .. .. 20 . 240 . 

BRI"R29.. 155/0/21.. 155/0/29.. 155/9.. 21/ 135/ 192/28/248/0/ 14.-240/8/6/ 126/0 

HAIKU 5 .. 1 26 .. / 31 .- 6 .- .- .- 6/ 0/ .- 7 / / / 7 / 1 28 / 0/ / 8 / 6 

HflTft0. 60/ 0/0/ 14/ 0/0.. 246/ 128/ 0/233/ 128/ 0^238/ 128^ 0/124/ 192 ..0^1/ 192/ 0.-121 

DRTR64/0/205/ 3.92/6/205/64/6/205/ 192/31/ 13/64/0/249/192/0/123/128/3/243..0 

BhTR3 .. 247 .. 1 28 .. 3 .- 7 .. 1 92 . 3 .. . - 7 .. 7 .. 1 28 .. 1 5 / 1 2 . 1 92 .. .. 6 . 1 28 . 

;üRTR0/60/0/0/ 14.-0/0.-246/128/0/238/ 128/0.238/128/0/ 124/ 192/0/ 1.. 192/0/ 121 

IfRTR64/ 0/205.. 192/ 6.. 205/ 64/ 6/ 205/ 192/ 31 ..13/ 64/ 0,249/ 192/ 0.-123/ 128/ 3/ 243/0 

.ÜRTR3 .. 247 / 1 28 .- 3 .7.1 92 . 3 / .- .• 7 ..0/0/1 5 .-0/0/0 .. '0 .■ / 

Üfi !"H0 / / / / .- .- .. .- .- .- .. .. - .. ..0-0 .. .8.8.0/8/0.0.0/0/8/0/0/0 / / 255 / 
T3RTR0 / 255 / / / ■ / / .. - .. .. .0.0 .. ■ . , .. .. .. .. .. . / . . © . .. ■ , 

ljRTR0/0/0/0/0..0..0/0.,0/28/3/ 128/28/3/ 128/ 127/255/224/ 127.255/224 
BRTR69.. 162/224/93.. 174/224/69- 162/224/33- 174.224/94/98/32.. 127/255/224 
BRTR 127 .-255/ 224 -28/ 3/1 23/ 28. 3/ 128/ 0/0.0.. 0/ 0.-0- 0.« 0.-0.. 0/0.- 0- 0.-0. 0.. 
BRTR8 .. .. .. .. .. .. , .. .. .. .. .. .. .. .. 8.-0/0/0/ .. .. 63 .- .. .. 1 1 5 / 23 1 / / 22 1 / 1 54 
BhT R48.- 231 .- 231 .- 152.- 255/ 216.. 102.- 227.- 134.. 216/ 254.- 219.. 0/ 1 13.- 176.. 8.- 63/0/0 

DR "!' R0 / 8 / / .< / .. / .. .. .. .. ., ..0/0 ,, 

JJfl'T R0 . .. .. 0. .. 8 .. .. .. .. .. 0.. 0.. .. 8.. 0.. 0.. / 0/ 0.. .. .. 8.. 42 .. 8 .. .- 1 71 / 192 ■ 8 - 175 .. 1 92 

BRTR2.. 170/240/3/255/240/3/255/240/8.171/132/0/42/0/0/0/8/0/0/0/0/0/0/0/0 

BRTR8 / / .. 8 / 8 / .. .- 8 

BRTR0.. 8 - - - 8 .. . 8.. 8 .. .. .. 0. 8 .. .. 0. 0,. 0.. . 8 . . . 8 , 0.. 3 .. 192 . 8 .. 5- 240. 8/5/112/8 

3RT fl 5... 112.. 15.- 41 .. 64.- 23.- 232.- 8.- 21 / 234/ 0/ 21 / 74/252.- 5/ 0/ 95.-8/ 8/ 87/ 0/ 8/ 87/8/8 

BRTR28 .. . ö .. ö .. .- .. 8 . 

BRTR8 - .< 8 .■ .. .- 8 . .. .. - ■ .. 8 , .. .. .. / / 0/ , .. . 48 .-0/8 / 68 .• 8 .- 8 .- 63 . 8 .- 8 

BRT R2 1 .- 1 63 .- 8 .. 63 .- 2 .- Ö .- 63 .- 2 .. 8 .. 63 .- 255 .. 252 ..21/ 85 .- 85 . 3 .. 255 .- 240 ..0/8/0/8/0/8 

Bftl R8 .- .■ .. 8 .. .. . 8 .. 8 .- .. 8 

BRTR0..42/0/8/ 168.. 128/51/ 196.. 172.-58/3/ 172.- 14.. 186/48/ 14.- 198/ 176/ 11/178/232 

BRTR46/ 183.243/26/253/ 138/ 170/223/ 166/ 138/ 117/ 168/48/221.-238/242/215/ 154 

Bm'R42/45,232.. 11/ 178/232/46/ 136/ 176/ 14.. 171/48/56/98/ 172.-58/156/148/32/170 

BRTR0/0/0/8/8 

BRTR0/24/8/0/68/0/0/ 126/8.- 8.-255/ 8/ 1 .- 128/ 128/ 1/ 159. 128. 1. 159/ 128/ 1. 159. 128 

DRTfll.. 158/ 123/1.- 158/ 128/1.- 153.- 128. 1. 159. 128. 1. 152. 128.-1/ 151/ 128.. 1.. 153.- 128 

BRT81 -• 158.. 128. 1 .. 145/ 128/ 1 . 159.. 128/ 1 / 153.. 123/ 1/158. 128. 1 . 144/ 128/ 8 ~ 

BHTR1 . 158/ 128.. 1 / 159/ 128/1/ 159/ 128/1/145. 128/1/145/ 128/1.- 145/ 128/ 1/145/ 128 

BRTRi/ 159. 128/ 1 / 159/ 128/3/ 159.. 192/7. 159. 224. 13. 159. 176.25. 159. 152.49/ 159 

BRTR148/ 127/ 159.254/213/159/ 171/213/159/ 171/213/159/ 171.213/159/ 171 

.DRTH2 13.1 59 ..171 .. 2 1 3 . 1 59 .. 1 7 1 .. 8 

BRTR213/ 159. 171 . 213/ i59. 171 / 253/ 255/ 191 / 255/ 255. 255. 31 / 255/^252 

BRTR 15..1 2 ? .. 248 . 3 1 .129 . 243 .. 30 . 1 29 . 232 . 62 . 1 95 . 236 . 63 . 67 . 244 . 32 . 66 . 4 . 63 . 1 95 

BRTR 252 > 8 ■ .< m - 8 .< H / . 8 . R .. , 8 . .. ■ . P\ .. . 8 .. Ff .. 8 . .. 8 .< .. 8 .. .. .. .. .. .. 8 

DR T fl2 1 3 .. 1 59 ..171.2 1 3 .. 1 59 .171 . 253 .. 255 . 1 9 1 .- 255 . 255 .. 255 . 3 1 > 255 . 252 

BRTR 1 5 .. 1 27 - 240 .31. 1 29 . 243 . 30 . 1 29 .. 232 . 62 . 1 95 . 236 . 63 . 67 . 244 . 32 . 66 . 4 . 63 . 1 95 

BRTR252. 8.8/ 0/63.. 195/252/31.- 129.248.31. 129.243. 15/8.248/ 15/8.248.6/8/96 

Bfi'lH&l .• .= , / / .: 
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lore 



Rüsten 



I\achdem das Programm gestartet 
und geladen wurde, werden die Data- 
statements und die Rennstrecke einge- 
lesen. Anschließend erscheint eine 
Mitteilung über die Spiel aufgäbe auf 
dem Bildschirm, 

Nun werden durch Tastendruck die 
einzelnen Spielvarianten festgelegt. 
Dabei hat man bis zu 27 verschiedene 
Möglichkeiten. Die Geschwindigkeit 
kann von bis 9 variiert werden, die 
Anzahl der Rennwagen beträgt maxi- 
mal 9 pro Spiel und die Rennstrecke 
kann von breit auf eng umgestellt wer- 
den. Sind alle Einstellungen vorge- 
nommen, kann mit dem Spiel begon- 
nen werden. Mit Hilfe des Joysticks 




muß der Rennwagen so gesteuert wer- 
den, daß es nicht zu einer Kollision mit 
den Kakteen kommt. 
Kommt es trotz aller Vorsicht doch 
zum Unfall, fällt der Rennwagen mit 
Totalschaden aus. Durch Drücken der 
Joystick-Feuertaste steht ein neuer 
Rennwagen zur Verfügung. Sind alle 
Rennwagen bereits eingesetzt worden, 
erscheint das Endergebnis auf dem 
Bildschirm. 

Der Spieler kann nun wählen, ob das 
Spiel wiederholt werden soll oder ob 
die Spieleinstellungen geändert wer- 
den sollen. Die veränderte Einstellung 
des Videochip kann mit RUN/STOP- 
RESTORE zurückgesetzt werden. 



i,».-«— •>■»»■*'- •* * JW*Mfi 't'^tÜ^^ 










*«* 
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100 

110 
120 
130 
140 
150 
160 
170 
188 



210 

220 
230 
240 
230 

270 



300 
310 



330 
340 
350 
3£0 
370 
380 
390 
400 
410 
420 
430 
440 
450 
460 
470 
4Ö0 
498 
500 
310 
520 



REM 
REH 
REM 
REM 
REM 
REM 
REM 
REM 



# 

# 

# 
# 



REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 



HIN30FT COMPUTER - 

PROQRflMMSERVICE PRE8ENT : 

WUE3TENRHLLEV 

PftOGHAMIEHT VON ' 

HflRTMUT ÖOETZE 

FUER: 

TRONIC VERLAG 



# <C) 01/1 



# 
# 

# 
# 

# 
# 
# 
# 
# 
# 

# 



##########################«#### 



ÖOSUB 850 ' REM MflSCHINENCÜBE EI HL. 

SVS49152 : DLR : PGKE250, 3 

V"S3248:P0KEV+28i i iPOKEV+37.0:POKEV+38i6»POKE5326i. 11 

PRINTCHR*<147>:PR1MT- 

PRINT" f IM I II II IIII1 IM I I I I 1 IM I II I I 

PRINT"« i I 

PRINT M II Cfll £i HUE8TEN R A L L E V I JIK WC" 

PRINT"!* I I» 

PRINT"« I I I II I II II IMI II I! II I M ! II III I" 

IFME«l.THEN48fif 

Pf? INT 

PRINTCHR*c:i44> ,, UEIHE AUFGABE IST ES MIT DEN GEWAEHLTEN" 

PRINTER INT "RENWAGEN EINE MGEGLICH8T WEITE STRECKE" 

PRlNTiPRINT'«ZURUECK2ULEGEN. DABEI MUSST DU DARAUF " 

PRINT: PRINT"flCHTEN DAS DU NICHT MIT DEN PFLANZEN " 

PH 1 NT : PR I NT " ZUSAMMENSTÖES3T . 

PRINT: PRINT" ACHTE RUCH DARAUF NICHT VOM WEG RBZU-" 

PRINT i PRINT "KOMMEN. " i CHR$<5) J " VIEL SPASS ! * 

PRINT i PRINTTflBC 15> "* TASTE *" = PGKE198, : WAIT198; 1 : ME-1 ' GÖT0328 

PRINTCHR»<5> "WELCHEN PORT 1 ODER 2 ?» :PÖKE 198.0 

GETWfl* ' IFWR*i" "THEN490 

I F WR*< " 1 " 0'RWfi*> " 2 " THEN490 

P0*2-VRL<Wfl$> • P0KE49531 , PO ' P0KE49578, PO : P0KE49654, PO 

PRINT 



weiter nächste Seite 



Impressum: Computronic erscheint 
alle 2 Monate im Verlag: Tronic- Ver- 
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330 PRINTCHR§<55 "WELCHE STRECKE ?" 

548 PRINT"!) BREIT 2> SCHMAL 3>8EHR ENO 

550 PRINT JPOKE 198,0 

560 GET HR* = I F Wfl*» " " THEN568 

57g iFWRf < M i "ÖRWRf >"3"THEN560 

580 S«VffL<Wfi*):S"S-i 

598 PRINT :PRINT"GESCHWINDIGKEIT ?" 

688 PRINT'»0 BIS 9";PÖKE198,0 

618 GETWfl*: IFWfl*- ,n, THEH6i0 

€20 I FWfl*< " " ORURf > " 9 " THEN6 1 9 

630 G"VRL<WR*) 

640 PRINT :RRINT"WIEVIELE RENNWRGEN ? 1 - 9" :F0KE198,8 

S50 GETWRS : IFWR*«""THEN650 

668 IFMMK " i " ORMRf > » 9 " THENS30 

570 R-VflL<U«> 

680 : 

690 FÖRI*0TO15 • P*PEEK< 832+8*1 6+1 ) ■ POKES80+I , P • NEXT ■ PQKE247, 39-P 

?m F0KE248, 135-GÜ5 : P0KE249, 

710 PPKE49344,112+R 

720 : 

730 PGKE251 .. 15 : S¥S49303 

740 8VS49422 : 1 FPEEK < 1 99 1 » 1 1 2G0T0748 

750 PÖKE53269, : R**" " : FQRI*8TG5 : fl#*CHR$<PEEK< 2023-1 )~64>+R$ '• NEXT 

?m PRINT "IT 

??& pRim tt mMatmm vorbei \ i 



780 PRINT 
790 PRINT 
800 PRINT 



PRINT "MIT "R" RENNWAGEN HRST DU EINE STRECKE" 

PRINT "VON 'W» METERN 2URUECKGELEGT- " 

PRINT"NGCHEINMRL BH8 SELBE SPIEL ?" =POKE 198,0 
S 1 GETWR* $ I F WR** *' " THENS 1 ' 
820 IFWR**"J M THEN730 
830 IFWRS&WTHEN320. 
340 GOTO810 
850 ■ 

850 REM MASCHINENSPRACHE CODE 
870 FÜR I «49 1 52TG49679 i REflDX » POKE 1 , X » NEXT 

880 BRTR128, 169, 51, 133, 1,160,0.. 185,8,288,153,8,56,185,0,289,153,8 
890 BRTRS7, 200, 208, 241 , 169, 55, 133, 1 , 162, 23, 189, 119, 192, 157, 216, 56, 202, 16 
900 BRTR247, 169,56, 133, 56, 169, 198,141,1,208,169,91,141,17,208,169,31,141 
910 BRTR24, 208, 162, 7, 189, 143, 192, 157, 32,208, 202, 16, 247, 142, 14, 212, 142, 15 
920 BRTR212, 140,5,212, 140,8,212, 162, 123, 142,4,212, 142, 145,2,232, 142, 18 
930 BRTR212, 169, 143, 141 , 24, 212, 169, 251 , 141 , 6, 212, 169, 1 1 , 141 , 248, 7, 169, 4 
940 SRTRI41, 1,212, 133, 252, 169, 216, 133, 254, 88, 96, 24, 91, 219, 219, 126, 24, 24, 68 
950 DRTR60, 126, 195, 219, 195, 102, 68, 24, 232,225, 225, 232, 239, 239, 199, 129, 60, 126 
960 BfiTR195,219, 195, 102,60,7,32,68,229, 162,40, 189, 184, 192, 157, 191,7 
970 BRTR1S9, 1 , 157, 191 , 219, 282, 288, 242, 141 , 21 , 288, 142, 27, 283, 142, 16, 208, 169 
988 BRTR168, 141, 0,288, 96, 87, 65, 71, 69, 78, 122, 96, 121, 96, 96, 87, 85, 69, 83, 84 
990 BRTR69, 73, 96, 96,82, 65, 76, 76, 69, 89, 96, 96, 77, 69,84, 69, 82, 122, 96, 112,112,112 
1000 B87R112, 112, 112, 155, 160, 156,168,160,160,168,168,5,5,7,13,5,5,7,13 
1018 BRTR173, 27, 212, 205, 27, 212, 240, 251, 74, 74, 74 

1820 BRTR74,74, 170,96,32,8, 193, 173, 17,208,48,251, 173, 17,288, 16,251,96 
1030 BRTR128, 162, 23, 32, 248, 233, 189, 239, 236, 133, 172, 181 , 216, 32, 288, 233, 202, 288 
1040 DHTR240, 32, 3, 193, 160, 39, 32, 241, 192, 189, 225, 192, 153, 0,4, 32, 241, 192 
1050 t(RTR189,233, 192, 153,8,216, 136, 16,235,32,241, 192,24, 165,251, 125; 168, 2 
1060 BRTR16, 2, 169, 1,197, 247, 144, 2, 165, 247, 133, 251, 133, 259, 32, 241, 192, 188 
187Ö ÜRTR176, 2, 169, 32, 174, 27, 212, 236, 27, 212, 248, 251, 228, 249, 176, 6, 169, 11 
1880 DRTR145, 253, 169, 29, 145, 251 , 136, 16, 231 , 162, 5, 254, 226, 7, 189, 226, 7, 201 
1098 ÜRTR122, 144, 8, 169, 112, 157, 226, 7, 282, 16, 238, 32, 8, 193, 173, 31, 208, 174 
1108 DRTR16, 208, 173, 8,228, 41, 4, 208, 20, 173, 0,208, 224, 0,208, 4, 201, 32 
1118 BRTR'144,9,56,229,250, 141,0,208, 176, 1,202, 173,0,228,41,8,288,28 
1120 DRTR173, 0,208, 224, 1,208, 4, 201, 64, 176, 9, 24, 101, 258, 141, 8, 288, 144 
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1130 ÜHTR1,232, 142.. 16,288,32,0, 193, 166,248,240,8, 160, 128. 136,208,253,202 

1140 BRTR208,248, 173, 31, 288, 240, 48, 141, 39, 208, 169, 129, 141, 4, 212, 162; 128, 160 

113Ö BRTR0, 136, 208, 253, 202, 288, 248, 169, 128, 141, 4, 212, 206, 199, 7, 173, 8, 228 

116Ö BRTR4i.a6, 288, 249, 162,23, 32, 255, 233, 282, 224, 5, 176, 248, 169, 7, 141, 39 

1 1 70 DRTR208, 88, 96, 77, 83, 88 

1180 REH REHNNRÖEH 

1 19Ö FORI*?04TO766 ; RERÜX : POKEI , X : HEXT 

1200 DRTR8, 160, 0,2, 168, 8,2, 168, 0,23, 173, 64, 23, 173, 64, 23, 253, 64, 3, 92, 0,3, 12.0 

1218 ÜRTR3, 12, ß,3, 12, 0,3, 252, 0,3, 252, 0,3, 172, 0,23, 173, 64, 23, 173, 64, 23, 93, 64 

1228 IlflTR3,92,0, 10, 170,8,42, 170, 128,21,35,64,0,0,8 

1230 REM KENNSTRECKE 

1 240 FÜR I ■S32T0879 : RERDX = POKE I , X : NEXT 

1250 DRTR0, 1 , 255, 2, 254, 3, 253, 0, 14, 15, 16, 15, 16, 15, 16, 17 

1268 DRTR8, 1 , 255, 1 , 255, 2, 254, 8,8, 8., 9, 9, 10,10,11,11 

1270 DRTR0, 255, 1 , 255, 1 , 255, 1,8,5, 5, 4, 5,5,4,5,5 

1288 



1280 RETURN 

Black Moore Castle 



Ein Besucher sucht verzweifelt einen 
Ausgang aus dem verwirrenden Laby- 
rinth von „Black Moore Castle". Um 
zu den höher gelegenen Etagen zu ge- 
langen, benötigt unser Besucher 
Schlüssel, die er mit Hilfe seiner enor- 
men Sprungkraft von der Decke 
pflückt. Auf seinem Weg in die Frei- 
heit hat der Verzweifelte todbringen- 
de Hindernisse zu umgehen und einem 
rasenden Monster auszuweichen. 
Der Ausgang aus dem unwirtlichen 
Schloß „Black Moore" befindet sich 
auf dem Screen irgendwo auf der lin- 
ken Seite, dort sind vier potentielle 
Ausgänge, die in die Freiheit führen, 
versteckt. Abschließend bleibt noch 
zu bemerken, daß unser Schloßbesu- 
cher natürlich unter einem enormen 
Zeitdruck steht, da seine „Lebensuhr" 
fast schon abgelaufen ist! 
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i PÖKE56333 , 127 = P0KE56 , 67 : POKE i * 5 1 

28 FORN-0TO2047 : PGKE24576+N, PEEK<53248+N> : NEXT 

38 PÖKE1 , 55 : P0KE56333, 129 

72 FORN-0TO6Z • RERDÖ : PÜKE26624+N, Q : NEXT 

^3 FORN*0TO62 : REfltiQ : PÖKE26688+N , Q : NEXT 

74 FORN*0TD62 ■ RERBG : PÜKE26752+N, Q : HEXT 

75 F0RN«8T062 : REfilfQ : PÖKE268 1 6+N , Q : NEXT 

76 FORN-ÖT062 • REflDQ : POKE26880+N > Q : NEXT 

77 FÖRN-ÖT062 = RERBQ : PÜKE26944+N , Q • NEXT 

78 F0RN-8T062 : 8ERÜ8 : POKE27000+N/ Q : NEXT 

79 FORN*0TO'62 = RERÜß : PÜKE27872+ N, Q * NEXT 

81 FÜRN-ÖT062 : RERBÖ : PÜK£27136+N, Ö = NEXT 

82 FORN=a0TÖ62 : RERUQ = PÖKE27288+N, Q = NEXT 

83 FORN-0TÖ62 : RERBQ : PÜKE27264+N, Q • NEXT 

87 FQRN=0TO26 : FÖRZ-0TO7 ; RERBQ = P0KE24376+N*B+Z » Q ■ NEXT : NEXT 

88 F0RN*48T057 = FGRZ*0TQ7 = RERBG ' P0KE24576+N*8+Z , Q • HEXT : NEXT 
9995 REM FIGUR VON FORN 1: BLOCK 168 

10800 BRTR8, 128,0,0, 168,0,8, 168,0, 10, 170, 128 

10018 BRTfl8ü 252, 8, 0, 252, 8> 0, 252, 0, 8, 48, 

10028 BRTR1, 85, 8, 4, 84, 64, 4, 84, 64, 4, 84, 64 

10830 DRTfll4, 86, 192, 2, 170, 0, 2, 138* 0, 2, 138/ 8, 0.136, 0. 8 

10048 BflTRi36,0,2,138,8,0,0,0,0,0,8 

108S0 REM FIGUR NACH RECHTS 1: BLOCK 161 

10Ö60 BRTR0, 128,8,0, 168,8,0, 168,0, 18, 178, 128 

10070 DRTR'0, 252, 8, 0, 263, 0, 8, 252, 8, 8, 48, 8 

10080 BRTR8, 88, 160, 8, 85, 192, 0, 80, 8, 8, 80, 

10898 BRTfl0,80,8,8, 168,0,0,160,0,8, 168,8,8,160,8,8 

1Ö100 ÜRTR160, 8,0, 168, 0,8, 0,8, 0,8,0 

10183 REM FIGUR NflÖH LINKS 1": BLOCK 162 

10110 DflTfl0i 8, ö, 0, 168, 8, 8, 168, 0, 18, 178, 128 

10128 BRTR0, 252, 0,3, 252, 8, 0,252, 8, 8,48,0 

10130 ÜRTR40, 28, 8, 13, 84, 8,0, 28, 8,0, 20,0 

18148 tlRTRÖ, 20, 0,8, 40, 0,0, 48, 0,8, 48, 0,0, 46, 0,8 

10138 BRTR40, 0,0, 168,8,8,8,0,0,0,0 

10153 REM FIGUR NftCH RECHTS .2 = 'BLOCK 163 

10160 ÜRTR8, 128,0,8, 168,8,0, 168,0, 18, 170, 128 

18178 IiRTft0,252,8,0,255,8,8,232,8,8,48,8 

1 81 88 ÜRTR0, 80 , 1 68 , 8 , 85 , 1 92 , , 80 , 8 , , 80, 

18198 DRTR0,80,8,0, 160,0,0, 168,0,2, 138,128,18, 18,8,2 

10280 JDRTR128,8',0,0,8,0,8,8,8,8,0 ■ 

10285 REM FIGUR NACH LINKS 2: BLOCK 164 

18218 DR'm0, 8,8,0, 168,0,8, 168,8, 18, 178, 128 

10220 BRTR0, 252, 8, 3, 252, 8, 8, 252, 0,0, 48, 8 

18238 BRTR48, 28, 8, 13, 84, 8, 0, 28, 0, 0, 20, 

10248 BRTR8, 28, 8, 8, 40, 8, 0, 168, 8, 18, 138, 0, 2, 130, 128, 

18250 BRTR18, 8,0, 0,8,8, 8,0, 0,8,8 

10255 REM FIGUR VON FORN 2: BLOCK 165 

3.8260 BRTH8, 128,8,8, 168,8,8, 168,8, 18, 178, 128 

10270 DftTRBi 232, 8, 0, 252, 0, 0, 252, 0, 0, 48, 8 

1 8280 BRTR 1,85,8,4, 84 , 64 , 4,84,64,4, 84 , 64 

10298 BRTR14, 86, 192, 2, 170, 0,2, 138, 0,2, 138, 8,8, 8, 8,8 

18300 ÖRTR8, 8,8, 10, 0, 8, 8, 0, 8,8,8 

18305 REM FIGUR VON FORN 3: BLOCK 166 

IB3XB ÖRTR0, 128,8,0, 168,8,8, 168,8, 18, 178, 128 

18328 BRTR0, 252, 8, 0,252, 0,0, 252, 0,8, 48, 8 

18338 DHTffl , 85, 0, 4, 84, 64, 4, 84, 64, 4, 84, 64 

18348 BRTR14, 86, 192,2,178,0,2,138,8,2,138,8,8,128,0,0 

18338 BRTR128,0,2,i28,8,0,0,8,0,0,0 

10393 REM SPINNE: BLOCK 167 
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10408 ÜRTR0, 0, 0, 6, 96, 0, 3, 48, 0, 1 ; 152, 

10410 BRTE0, 204, 0,12.. 204, 192, 15, 207, 192, 27, 255, 96 

10428 BRTO25, 254,96,25,254,96,49,134,48,51,3,48 

10438 BRTR51, 3, 43, 3, 0,48, 3, 0,48, 3, 0,48, 0,0, 0,0 

10440 BRTR0, 0, 0,0,0,0, 0, 0, 0, 0, 

10450 REH TÖTE FIÖUR: BLOCK 168 

10460 BRTRB, 0,0, 0,0, 0,8, 0,0, 0,0,0 

1Ö470 ÜRTR0, Ö, 0,0, 0, 0, 8, 0, 0, 0, 0, 

10480 BflTBB, 0,0, 0,0,0,8, 0,0, 0,0,0 

10490 BR7B0, 0,0, 0,0, 0,0, 0,0, 2,0, 2,2, 0,2, 18 

10500 BRTR245, 106, iö>245, 186, 10,245, 106, 10,245, 186 

18510 REM GRR£: BLOCK 169 

10520 BRTfl'0, 0,0, 0,0, 0,8, 0,0, 0,0,0 

10530 DRTR0, 12, 0,0, 12, 0,0, 12,0,0,12,0 

10540 BRTH0,255, 192,0,255, 192,0, 12,8,0, 12,0 

10550 BRTRS, 12, 0,0, 12, 8,0, 12, 8,0, 63, 0,0, 255, 192,3 

10560 BRTR255,240,3,255,240, 15,255,252, 15,255,252 

10570 REM SPINNE i BLOCK 170 

i8580 BRTR0, 0, 0, 0, 25, 128, 0, 51 , 0, 0, 102, 

18590 BRTR8, 204, 0, 12, 204, 192, 15, 207, 192, 27, 255, 96 

10SS0 BRTR25, 254, 96, 25, 254, 96, 49, 134,48,51,3,48 

10618 DRTR51, 3, 48, 48, 3, 0,48, 3, 0,48, 3,0, 0,0, 0,0 

10620 BRTR0, 0,8,0,0,0,0,0,0,0,0 

12000 REM mm 2EICHENSRTZ BRTRS mm 

13140 rem ******* buchstrben ********* 

13145 BRTR€0,66, 153, 161, 161, 153, 66, 60:REM @ 
13150 BHTR60, 126,102, 182,126,126, 102, 102= REM R 
13168 DRTR124,126,i02,126,126,102,12£.,124JREM B 
13170 BRTR60, 126, 102,96,96, 102, 126, 60: REM C 
13172 BRTR120, 1.24, 102, 102, 102, 102, 124, 120: REM ß 
13174 ÜRTR62, 126,96, 126, 126,96, 126, 62: REM E 
13176 BRTR62, 126,96,96, 126, 126, 96, 96= REM p 
13178 BRTR60, 126, 96, 110, 110, 102, 126, 60: REM G 
13180 BRTR102, 102, 102,126, 126, 102, 182, 102'REM H 
13182 BRTR60,60,24,24,24,24,60,60=REM I 
13184 BRTR6,6,6,6,6,102,126,60:REM J 
13186 BRTRI02, 102, 108, 120, 120, 108, 102, 102 = REM f< 
13188 DRTR96,96,36,96,96,102,126,60:REM L 
13190 BRTR227,247,255,223,203,195,195,195:REM M 
13192 BRTR102, 118, 126, 126, 110, 102, 102, 102: REM H 
13194 BRTR60, 126, 102, 102, 102, 102, 126, 60: REM 
13196 BRTR60, 126, 102, 102, 126, 124, 96, 96:REM P 
13198 BRTR60, 126, 102, 102, 110, 110, 127, 63: REM Q 
13200 BRTR60, 126, 102, 102, 126, 124, 102, 102: REM R 
13210 BRTR60, 126, 96, 124, 62, 6, 126, 60: REM S 
13212 BRTR126,126,24,24,24,24,24,24:REM T 
13214 BRTR102,102,102,i02,102,102, 126,60:REM U 
13216 BRTR102, 102, 102, 102, 102, 102,68,24 : REM V 
13218 ÜRTR195, 195, 195, 203,223,255, 247, 227:REM M 
13220 BRTR102, 102,60,24,60, 102, 102, 102=REM X 
13222 BRTR182, 102, 182, 60, 24, 24, 24, 24 = REM V 

13224 BRTR126, 126, 14,28,56, 112, 126, 126:REM Z 

13225 REM ********* ZRHLEH ********** 

13226 BRTR60, 126, 102, 102, 102, 102, 126, 60= REM 
13228 BRTR24, 56, 120, 88, 24, 24, 60, 60= REM 1 
13230 BRTR60, 126, 102, 12,24,48, 126, 126: REM 2 
13232 BRTR124, 126,6, 126, 126,6, 126, 124:REM 3 " 
13234 ÖRTR102, 102, 102, 127, 127, 6,6, 6:REM 4 
13236 BRTR126, 126,96, 124, 126,6, 126, 60'REM 5 
13238 BRTR60, 126,96, 124, 126, 102, 126, 60: REM 6 
13240 BRTR126, 126, 14, 28, 24, 24, 24, 24: REM 7 
13242 DRTR60, 126, 102, 60, 60, 102, 126, 66 • REM 8 
13244 BRTR60, 126, 102, 126,62,6, 126, 60: REM 9 
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PRINT*^" :PDKES6/S7:POKE53269/0iV*53248-SI-54272 

1 QZ*»"— ■ " •HS~10ö:pOKE53280,8-POKE53281,0 

2 PRINT i( r:B!t^M«B!lsIi?>MIIiiiiiMaJOVSTICK PORT 2" 

3 PRIKT"nWimniiERdTES SPIEL ? CJ/H)" 

4 GETR* 

5 IFfi**" J H THENPRINT":T : ÖÜTÖ79 

6 I Ffl$« M N " THENPR 1 NT " 3 M ■ GÜTO90 
? G0T04 

79 FÖRN=64TÖ69 '• FÖR2=0TÖ7 = RERDÖ : PÖKE2457S+N*8+Z, Ö : NEXT : NEXT 

90 PRIWTCHR*<3> = PGKE56576, 6 : P0KES48.. SB • PGKE53272 j 25 

91 P0KE53292, i 1 = PQKES3283, 9 : POKEV+22, 24 ' GOTG4000 

100 GGSUB3000 = RS" 18333 : ZX=1785S = PR«300 

101 PÖKEV+28, 3 : PGKEV+38, 4 = POKEV+37, 9 J POKEV+39, 12 

102 PGKES1+24, lS:Pü'KESI+6,25S:P0KESI+4, 1 29 = PGKES 1+12, 9^0^31+26 ..235 

103 PGKESI+18,17 



188 POKEV+0,37 

189 PGKEV+2,33 
110 P0KEV+21..3 



P0KEV+1,223:PGKE18424, 160 

POKEV+3,130 

POKEV+30, : PGKEV+3 1 * 8 

1 1 5 RB»57 : CD»223 : 8P=9 

1 16 I J*35 : TV* 130 : 1=4 : Z-l : 11*1 = V=0 
210 E=D-FO1«0 ■ 

•212 I FSF»0THENO0 • R»0 : R-0 : M 1 * 1 60 = M2- 1 60 

213 J0-PEEKC36328) :KO«PEEK<53279> 

232 I F JQs i 2S«MIiSPa0THENM 1 - 1 66 : M2* 1 65 : C*G = R«F : RS« 1 

233 IFJO-125RNDSP»0THENM1«166 : M2« 165 • OU = R«L : flS-1 

234 IF< JORITO4>»0flNBSP"0THENMl*162 = M2-164 = R*~4 : R«-l 

235 IF<JORNDe)«0HNDSP»0THENHl"i61 •M2«163:fl*4:R*l 

236 IFJGO127fiNBSP*0THENFOl-50 

237 IF<JORHD16>^0RNÜ8P«0RHIIPEEK(R8)O66RHDPEEK(RS+40)O66THENGO8UB1120 

240 ö*0J U*0JF*0iL»0: IFCD<HRND'SPalTHENC*-C 

241 IFCD»G'PINDC«»4flND8P-lTHENSP«0-ä C-8 

245 R£*RB+R = CB-CB+C = I J-IJ+I • TV«TV+V 

246 POKEV+8, RB : PGKEV+I * CD ' PÖKEV+2, IJ : PGKEV+3, TV 

247 POKEV+31 , : PÖKE18424, Ml • POKE18425, 167 : PGKESI + 1 .. FG1 ' POKESI+1 , 

248 HB-flB+fl : CB»CB+C : RS"RS+R '• IJ-IJ+I * TV-TV+V = ZX-ZX+Z 
249.PRIHT l, aWflWIWW< B 

251' PRiNT ,r i?M»iltiiiliil(»iiii*l»l»iMiiiiiiiil ,, ;><j "II " 

252 PRINT ll MmmfllViiHIHtlli'IUPWn«Iim il JPflJ M H " : IFPR-0THENGOTO480 

254 PRNPFf-1 

255 IFRB<25THENN*0:ßüTO790 

257 IFJ*SRNDRS«8DFTHEMJ»0 : XC-1 

258 I FPEEK < RS > «66ÖRPEEK < RS > «69THEN0--4 - F*-40 
239 I FPEEK C RS+40 > a 66GRPEEK ( RS+48 ) *69THENU*4 : L*40 

260 I FPEEK <RS+1 >*64flNBH*4GRPEEK<R3+l >*69flNDR*4THENflB*fiB-8 = RS~R5~1 

261 I FPEEK < RS- 1 >«64RNDR=-40RPEEK<RS-1 >-68RNDfi*-4THENRB*flB+8 : RS-RS+1 

262 IFPEEK<R8)*870RPEEK<RS+1 >*87GRPEEK<RS-1 )*87THENP0KEV+31 » : GOTOl 1 12 
272 1 FPEEK C RS- 1 2Ö > -S7QRPEEK < RS- 1 2 1 > -670RPEEK t RS« 119) »67THENG0SUB 1 1 24 

274 IFPEEKCRS+40)»32flNBSP"0ORPEEK<RS+40)"96RNBSP^THENGOTO400 

275 IFRS*GKIflNBXC*lTHENXC=0:GOSUB59fl 

276 IFCB«79THENG«?9:H»71 

277 IFCBal27THENGal27:H*li9 

278 IFCB*17STHEKGal75JHal67 

279 I FCB«223THEHG«223 : H<*2 1 5 

281 IFZX a sl8355THENE as S : B !H l 

282 I FPEEK < ZX+2 ') «64RNB I «4GRPEEK < ZX+2 > ^SBBHTi I «4THEN I *-4 = Z— 1 = E*D 

283 1 FPEEK < ZX-2 ) -64flHB l --4GRPEEK C ZX-2 ) -68RWB I «-4THEN I *4 : Z» 1 

284 IFPEEK<ZX?*69RNBl«-4flHBE*lTHENV«-4:Z*-40.'I*0 

285 IFPEEK<ZX)*32R'HDPEEK<ZX+40>»66RNBVa-4RNDE*iTHENV-0 = I«-4 * Z«-l = E«0 

286 IFPEEKCZX)«66RHBE*BflNBI— 4THENV— 4:Z"-4B* 1*0 

287 I FZX* 1 7629THEHE«B = D«2 

288 IFPEEK(ZX+40)»66RNBI»-4flNBE«T2THENV«»4:Z»40s 1=0 
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289 IFPEEKCZX)=S9flNDV«4P(NlJE-2THENV-0 = I-- 4 ' Z*~l • E*8 

290 I FPEEK < V+38 > «3THEHPQKE V+30 * 6 = GOTO408 

338 PÖKEV+8 , ft'B = POKEV+1 , CD : PQKEV+2 , IJ = POKE V+3 , TV 

339 POKE 18424, M2 : P0KE18423, 170 : IFflS*iTHEHFIS*0 : POKES1 + 1 , 58 : POKESI+1 > 

340 Ö0TÖ21B 

34 i I FB>=HSTHENHS*B • Q0T0343 

342 GDTO4080 

343 POKE532S0, : F0KE53281 , 

344 PRlHT u ZmmtM»*WmWWn ENTER VÖUR NfiME" 

345 IHPUT ,, IWMHflME<4»8 BUCHST .)" ; QZ* 

346 lFLEN<QZ*»8THENPRINT l, »BWftME TO LONG* 1 :FORN«0TO 1580: HEXT =GÖT0344 

347 IFLEN<GZSX4THENPRIMT H :HRNfiME TG SHORT*' :FÖRH*8T0 1500' NEXT-GGT0344 
340 GOTO4008 

4ÖS POKEV+28, 2: JMS 

4 1 FÖRN*PEEK < V+ 1 > TÖ220 : PO'KE V+ 1 , H ■ FOKEV+39 , N : HEXT • X-X- 1 : POKEV+28 1 3 

4 1 1 POKE V+0 , PEEK < V+0 > - i 5 : POKE 1 8424 , 1 68 = FÜRN»0TÖ3008 : HEXT 

4 1 2 POKEV+28 , 2 : POKEV+39 , 9 = POKE 1 8424 , 1 69 : FORN«0TO3000 : HEXT = POKEV+2 1.0 

420 i fx*0tthenpr i nt » mmmmtmntmwnußwiE over r : FORN-0TO4000 * hext ; ogtg34 1 

308 PRIhrr u MPM?Mi!H^M«?Ii?liliiMiiiiKriNE MAN KILLED«" • FORN-0TO3800 • NEXTJGOTO5000 

590 h-M3 = POKE i 8424 , 1 68 = M 1 ~ 1 £0 = M2= 1 £0 

600 POKERS-2 , 32 ■ POKERS-42 , 32 : POKERS-82 , 32 = POKERS- 1 22 , 32 : POKERS- 1 62 , 32 

£01 IFN>2THENRETURN 

602 FORK=0TO58 : HEXT 

£iÖ POKERS-2, £8 = POKERS-42, £4 = POKERS-82. £8 '• POKERS- 122, £4 = POKERS- 162. £8 

611 FORKs0TO50 = HEXT 

620 N-H+i : GÖTÜS88 

790 SB- 149 

888 POKEV+21 1 8 ■ FÖRK«8TG7 = POKE53280, K ■ P0KE64S, K 

881 H-N+l 

802 fi*C0)*" VOU WON" 

803 FWa>» H SCORE +« 

884 fl*<.2)*"TIMEßöNUS MRL 28" 

805 fl*<33- ,, FRSTB0NUS 208 " 

806 IFN>49THENM«1 

887 IFN>99THENM»2 

888 IFN>149THEHM»3 

810 PRiHT»mmm(mßmn**wm*m n a*<m 

828 HEXT: XFN>199THENM»0:B*B+PH#20:B*B+200JQOTO341 
821 IFPflKi31fiNDN>f 40THEHH-0 • B«B+Pfl#20 : 00T0341 
838 ÖOTO800 

1800 pm-n^mtMmmMmwmmMtmMtmwnxMMBBXWMim n-r; 

1010 RETURM 

1 188 IFSF«0THENM1* 160 = M2*160 ■ ft*0 = C*8 : R*8 

1110 RETURH 

1112 XFPEEKCV+31 5-1THENP0KEV+31 , 8 ' 00T0488 

1 1 13 I FPEEK CV+31 )*3THEHPÖKEV+3i , 8 : ÖOTO400 

1114 POKEV+3i,0:GÖTö2?2 

1 128 IFPEEK<RSK>66THENSP*1 : C*~4 : FO1*0 
1121 RETURH 

1124 IFPEEK(V+31>«lTHENPÖKERS-120,32iPOKERS-12i,32:POKERS-il9,32'GOTO1129 

1125 POKE V+3 1,0: RETURN 

1 128 POKERS-160, 32 : POKERS- 161 , 32 : POKERS- 159. 32 '■ B*B+25 : J<T+1 : GOTOl 125 

PÖKEV+32, = FOKEV+33, = PRINT H ^r^-*-^-^^-^-*-:"-^*»--•'"-"»^"-■"-*--" -, -•" i 
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3804 PRINT 1 "" 


BMI 


3885 PRINT 1 '- 
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3807 PRINT 11 - 
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mm 
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3012 PRINT"- I "-- I - • -"; 

3013 PRINT"- '""' --- " ------w---«; 

3014 PRINT"-"---- ---I ~"-~~~ |- ------- sßONUSH -"; 

3815 PRINT"- I I rO^iS -----■"-»--" .; 

3016 PRIHT"™ i i BUS - -".: 

36 17 PRINT"- I I _--------— i; 

30 15 PRINT"- i . i ---_---_-_«; 
3Ö13 PRINT"- " ~ _-^_-_-w-«; 
3Ö20 PR I NT " ------- - i ----------- 1 ---.-------------» : 

3021 PRIHT"- Uli- 1 « I ~---- | „---------"; 

3Ö22 PRINT""- fTrfll I -*--- I ----------«; 

3Ö23 PRIHT"- i ----- | -.---------»; 

3024 PRINT"- I ----- I -----_----."; 

3098 PRINT"- ""' ~--™-- ™ ---.-«--.---■■; 

3100 POKEiS407,S4:POKES6295,9 

3110 RETURH 

480Ö POKE V+ 32 , : POKE V+33 , : OP™0 = PR I NT " SMm*-*""-"-*-"-"^"*^-"*----*""^-""' 

4001 PRIHT' 1 «-"- -"-" 

4Ö02 PRINT"«--™ sl BLRCK MOOR CASTLE ■ "~ w " 

4883 PRINT"«--- ---" 

4004 PRINT"«--- m COPYRIGHT« "-"" 

4805 PRINT"«-"- -~- lf 

4006 PRINT"«--- 31984 EV JUERGEN PT.LGTR ---" 

4007 PRINT"«-™- _ _ -•*"-" 

4009 PRIHT"SW»mr-~ --*-" 

4015 PRlNT"W»WMiH"- IM I SCORE* VON« ~~~" 

4011 PRINT"Hil(»i»i»|--~ ---" 

4012 PRINT-'UMMiMI--- «"ÖZ*" : " 

4013 PRINT"»MMM«r-- "--""' 

4014 PRINT"isMiMiiH-~ af"HS 

4Ö15 PRINT"IS»iiiii8iir-- ---" 

40 1 6 PR I NT " Win»»!»!---.--.----------------'' 

4017 PRIHT''^iiift»*iiaLRST SCORE- "B - 
4 1 60 PR I NT " »fflOtiföffl^^ 

4101 pRiNT"'joii«ii»iiiii»iiii»*»ii»i*iftiiiiiiith-™-" 

4200 L*<3)-" ■ PRESS FIRE TO STRRT " 

42:10 L*<0)-" HOHLE DIR DIE 3CHLUE88EL 

4215 Ufa?*". UHU SUCHE DEN RUSGRNG " 

4216 L*^)-" RCHTE RUF BEINEN BONUS " 
4220 FORK-1TO60 

4225 pr i nt " -mmmmmmmmmmmm n .; 

4228 PRIHT"SI"MID*<L*c:OP:^K..40> 

4230 FORW-0TO100:NEXT 

4231 IFPEEK<56320>«1 1 1THENB-0 * 0*223 • H*215 = J«0 = X~3 : POKEV+31 , : OOTO5000 

4233 HEXT 

4234 0P«0P+1 = IFGP>3THENDP»0 
424Ö GOTO4220 

S000 E« 1 24589 = E 1 « I NT < 4*RNB< E > > 

5010 IFE1>3THEHGOTO5000 

5020 IFE1-0THEHSDF« 18329 '• GKI*18330 : E=0 

5030 IFE1*1THENSBF*1 7609= OKI«! 761 0:E*1 

5035 IFEl-2THENSDF-i?ö49 : OKI« 17850 !E«2 

5036 I FE 1 -3THENSBF- 1 8089 ■ GK I * 1 8090 ' E~3 
5060 GOTO 100 

20000 REM **## ZEICHENS'RTS ***# 
2Ö0 1 BRTR255 ,213 , 85 , 85 , 85 , 85 , 85 , 2 1 3 ■ REM SH . * 
20012 »ftTfi24,60.. 182.. 195,195.. 102.. 60, 24: REM SH.R 
2Ö014 BRTR130, 130, 130, 170, 170. 130, 130, 130-REM SH.B 
20016 BRTR24, 24, 24, 24, 24,248, 248, 24: REM sh.C 

20018 BRTR255,95,S7,87,87,87,e7,95!REM SH.B 

20019 BRTR130,130,138,170,170,130,130,130:REM SH.B 
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smm; 



Computerspiel: |j 



Jetset-Freddy 



jj 



Ein sprungreiches Taktikspiel nach dem 
Motto: Erst kalkulieren, dann agieren! 



Sie befinden sich auf „Cavernata", 
einer Insel im Mittelmeer. Sie ha- 
ben ein riesiges Höhlensystem ent- 
deckt und wollen es natürlich er- 
forschen. 



Ihre Aufgabe besteht darin, in jeder 
der sechs Höhlen eine bestimmte An- 
zahl . von Gegenständen einzusam- 
meln, um in die nächste zu gelangen. 
In jeder Höhle bedrohen „Jetset-Fred- 
dy" todbringende Gefahren. In drei 
der sechs Höhlen können Sie gegen 
Mauern springen und sie damit um 
einige Steine erleichtern, was aber zur 
Folge haben kann, daß Sie nicht mehr 
weiterkommen, weil Sie sich den Weg 
im wahrsten Sinne des Wortes ver- 
baut haben. 

In den restlichen drei Höhlen wird da- 
gegen jeder Sprung gegen die Mauer 
mit dem Tod eines „Freddys" bestraft. 
Aber auch das Einsammeln eines Bo- 
nusses kann sich als Fehlgriff erwei- 
sen. Wenn derselbe zum Beispiel in 
eine Treppe eingebaut war, so ist diese 
nicht mehr zu besteigen. Zudem sind 
in jeder Höhle eine große Anzahl von 
Bomben deponiert, die Sie nur durch 
die Lösung von bestimmten Aufgaben 
(die auf dem Screen erscheinen) ent- 
schärfen können. Bei der Lösung der 
gestellten Aufgaben spielt der Zeitfak- 
tor eine entscheidende Rolle, denn die 
Highscoreliste kann nur derjenige an- 
führen, der für seine Lösungswege den 
geringsten Zeitaufwand benötigt. Für 
fortgeschrittene „ Computer-Fr eaks" 
wird noch eine zweite Spielstufe ange- 
boten, in der der Schwierigkeitsgrad 
wesentlich höher ist. Jetzt ist die 
Durchquerungszeit für jede Höhle be- 
grenzt. Verliert „Jetset-Freddy" in ei- 
ner der Höhlen sein Leben, so ist es 
kaum möglich, die verlorene Zeit noch 
aufzuholen, da wieder vom Ausgangs- 
punkt vor der Höhle gestartet werden 
muß. 




PR 



1 REM 

2 REM 

3 REM 

4 REM 

5 REM ***************** 

6 BORDER ö: PflPER 0: CLS 
INT AT 7,8; INK 6; "BERND SCHISSL 

£R M ;RT 10,11; "presents"; AT 14, 11 
; INK 2; PRPER 6; FLA5H l; "mBBG 
BE B"; AT 15, 11J "BFREDPYB";RT 16,1 

i; "BBBDBQBB": flash 0: GO Süß 30 

00 

7 LET böds0: LET hSC«4: 

ET a$ = ' , SERND" : INPUT 
■Üi"; C$: IF C$ = " j 
Pfog=1000: LET 20=1: LET 
GO TO 3200 

8 LET bed=:0: INPUT 

SBÜia :";n$: IF LEN n$>12 
TO 3 




THEN 



9 input aaHomaai 



S$: IF 



CODE S$<>49 AND CODE "*$<>S0 OR 
LEN S$>1 THEN Qu TO 9 

10 LET h*0t LET unt*0: LET bQ * 
0: LET t*0: LET. S C *0 : BRIGHT 1 

11 BORDER 0:- PRPER 0; INK 6: C 
LS 

12 PRINT AT 0.0; INK 1; PRPER 



SAMMELN SIE DIE GEGEN 5TOEN DE- 
IN DEN HOEHLEN EIN, EIS S£E : ?.IN : DI 
£■ NAECHSTE- KOMMEN .' ! ! ^;.\; 

: ABER DAS. IST , LEICHTER G.ES.ROT: .; 
RLS GETAN ;, DENN UIELE BOMBEN fciftRT 
EN NUR DARAUF .EXPLODIEREN £,DUER 
FENWENN ES . IHNEN NICHT GELANGT ,3 
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Ä3ÖSK 



ffgg^L 



IE DURCH D.LOESEN EINER RUF GABE 
ZU ENTSCHA'ERFEH" ! !' 



13 PRINT RT 10,12; INK 6; PRPE 
R 2; FLASH Ü "ACHTUNG" ;RT 12,0; 

INK l; PRPER 7; FLASH ö; 



IN DER 
ERSTEN HOEHLE NUESSEN 5IEDIE RAD 
IORKTIUEN STRAHLEN MIT IHRER U 
AFFE ABWEHREN ' ! EINE BERUEHP 
UNG KOSTET EIN LESEN !!! ABER «,'0 
RSICHT: ! ! DIE STRAHLEN . ZERSTOE 
REN DIE KRUEGE',UENN SIE S_I_E UOR 
IHNEN ERREICHEN M 



i 4- PRINT RT 19,0; PRPER 7; I N K 
1 : " Mld31!KM^s*jaidH:il=fcfahi3ISkristirai13ni 



_WENN SIE EINE BESTIMMTE PUNK 
T- ZAHL ERREICHT HABEN . KOMMEN 
SIE IN D.NRECHSTE SPALTE brw HOE 
HLE< 



INK 2; PAPER ö; " 
K, ";n$; " ! ! " : RES 
«1 TO 42: RERD dau 

dauer ,. hoehe 
, .5,5, .5,7, .75,4, . 
, .5,9 , .5, lö, .75,9, 
7 , . 5 , 5 , . 5 , 4 , 1 , 5 , . 5 
2 , . 75 , 12 , . 25 , 10 , . 5 
, . 5 , 10 , . 75 , Iß , . £5 , 
5 , 10 , . 29 , 9 , .25,7, . 
, lö, .5, 12, .25,14 
,.5,9,-5,7,1.5,5 
75Ö: GO 5UB 2999 



15 PRINT »ö; 
UIEL GLUEC 

TORE 16: FOR g 

er,hoehe: beer 

16 DRTR .5,5 
25,5, .5,7, .5,9 
.25,7, .5,5, .5, 
, 12 , .5 , 12 , . 5 , 1 
, 9 , . 5 , 10 , . 5 , 10 
9 , .5,7, .5,9, .2 
25,5, .75,9, .25 
125, 12, . 125, 10 
NEXT 9 : PAUSE 
GO SUB 100Ö 

17 BRICHT 1: 

: INK 5: FLRSH 

19 INK 6: PR 
";SC; PRINT RT 

20 REM * 

* 



BÜRDER 0: PRPER © 
0: 

INT RT 0,7; "SCORE: 
0, 22.; "MEN : " ; me 
GRAFIK B * . 
GRAFIK F * 



* 1 = GRR 

* J a GRA 



FIK 
FIK 



* 



ftsS: LET X=2 



* K = GRAFIK C * 
.21 PRINT RT 19,1; INK 6;"f";RT 
20,1; INK ö; "t" 
23 LET ri»l: LET 
0: LET y=l 

25 LET yvay; LET XV ax 

26 LET tst + 1: IF S$a".2" AND t> 
tS THEN GO TG 1485 

27 IF RTTR (X +1 , y ) «böfft be THEN 
GO TO 30Ö 

3ö IF büsbüS THEN BEER .09,20: 
BEER .09,-1: PRINT RT XS.MSi M 3E" 
: LET bö=0 

33 IF h=l RND xsxsi RND y=ysl 
THEN BEER .05,0: BEER .09,-10: P 
R INT AT x , y .; " " ; AT x - 1 , y ; " " : LE 
T yay&a 

35 IF SC aS CS THEN CLS : LET bO 
=0: GG TO 1400 

38 REM * TASTRTURABFRRGE * 
40 IF INKEY$="q" AND SU «4© THE 
N LET yl=0: LET xa=X: GO TO 210 
45 IF INK£Y$ = ,, q" RND £U=0 THEN 
LET yls©: LEJ xa»X: GO TO 204 
50 IF INKEÄa*'«" THEN LET yl=3 
: LET Xä=X: WTO 170 +Su 

55 IF INKEY $ = ■*.:." THEN PRINT AT 
X,y; INK 6;"S": LET xa=X: GO TO 
30 

60 IF INKEY$="p" THEN PRINT RT 
x,y.; INK S.;"S": LET xa=X: GO TO 
120 
55 GO TO 25 

75 REM * BEWEGUNG N. LINKS * 
80 LET ysy-l: IF y v < >y THEN PR 
INT AT x,yv.;" " ; AT x-l,yv; M " 



33 LET ri sl 
35 IF RTTR 
TO 320 
89 IF RTTR 
büssbO + 1: GO 
91 IF RTTR 
9=25 TO 60: 
LET X=X-3: 



CX,y)=böWbe THEN GO 



(x , y ) abonus 

SUB 450 
<x-l,y ) =207 

BEER .01,9 
GO Tu 98 



SCREEN* (X , y ) <>" 
ix , y ) =bönus THEN 



< x - 1 , y ) 

i sbonus 



95 IF 
OT ATTR 
+ 1 

96 IF SCREEN* 
NOT RTTR i:x-l,y 
y =y +1 

93 IF y<0 THEN LET y =0 
101 IF X>=21 THEN GO TO 
104 IF X>axa+ft THEN GO 
107 PRINT RT X-l,y; INK 

T x , y .; INK 6.; "J" 
110 IF SCREEN* »:x + l,y:» = 
PRINT RT x ,y .; " ".;RT x-l 

LET X=X+1: GO TO 101 
113 GO TO 25 
115 REM * BEWEGUNG N 



THEN LE 

THEN FO 
NEXT g- 

" AND N 
LET y=y 



< > 



THEN 



300 
TO : 
6: " : 



AND 
LET 



300 



H 



THEN 



120 LET yay+1 
INT AT x ,yv ; " 

123 LET ri=2 

126 IF RTTR 

TO 320 

129 IF ATTR 
T böabO+1: GO 

132 IF RTTR 
R 9=25 TO 60: 
: LET XsX-3: 



IF 

AT 



yv < 
x-l 



RECHTS 
>y THEN 

, yv .; " " 



PR 



<x,y)=bombe THEN GO 



Cx ,y ) sbonus 

5UB 450 
(x-l,y ) =207 

BEER .01,9 

GO TO 133 



THEN LE 



THEN 

NEXT 



FO 

9 



SCREEN* (X ,y ) < >" 
(x ,y) sbonus THEN 



135 IF 
OT RTTR 
-1 

136 IF SCREEN* <x-l,y>0" " 
NOT RTTR (X-l,yS =bonus THEN 

13S~IF y>31 THEN LET y=31 
141 IF X>=21 THEN GO TO 30© 
144 IF x>=xa+ft THEN GO 



" AND N 

LET y«y 



AND 
LET 



INK 



y j s 
X-l 



y 



147 PRINT RT X-l,y; 

T x .-y; RNK 6.: "T" 
150 IFgSCREEN* ix+l 
PRINT ffr x,y; " ".; RT 
LET X=X+1: GO TO 141 
153 GO TO 25 

REM * SPRUNGSTEUERUNG 
IF ri=l THEN GO TO 192 
IF r i =2 THEN GO TO 130 
FOR 9=1 TO 4 
IF SCREEN $ 
GO TO 30© 



TO 300 

6; "f-;R 



THEN 



165 
170 
175 
ISO 
153 
HEN 



(x-2,y+g) 
<x-i,y+9* 

210 



< > 



Tu 
4 

i:x-2,y-g) 



ATTR 
300 
(X-2 

ATTR 

300 

(X-2 



T 



T 
T 



A 



ix-2,y + 1) =b 



< > 



< > 



(x-l,y-gi o 

TO 210 

. (x-2,y + 1J <> 



186 IF SCREEN $ 
HEN GO TO 300 

189 NEXT g: GO 

192 FOR 9=1 TO 

195 IF SCREEN« 
HEN GO TO 300 

198 IF SCREEN« 
HEN GO TO 300 

201 NEXT 9 : GO 

205 IF SCREEN* 
ND riaa RND NOT 
onus THEN GO TO 

207 IF SCREEN$ 
ND ri=l RND NOT 
onus THEN GO TO 

210 IF SCREEN* 
N GO TO 3Ö0 

213 IF ATTR (x , y +1) abOffi be RND r 
i=2 THEN GO TO 300 

216 IF ATTR <x , y -1) sbom be RND r 
i =1 THEN GO- TO 300 

219 IF ri=l AND RTTR Cx-l,y-l) = 



y-li 
(X-2 

y ) < > 



<>" - R 
,y-l) =b 

' ** THE 
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fft£3teair- 



^§S5; 



bonus THEN 

50 
222 IF ris 

bönus THEN 

5© 
225 LET X = 
228 IF ris 
23X IF fi= 

TO 260 
23? IF XV < 

, y~l; " "; AT 
240 IF y+y 

243 IF X> = 
246 IF X< = 
249 IF X> = 
252 LET y= 
INK 6; "f"; 
255 IF 5CR 
PRINT AT X 

LET yl=0: L 
258 GO TO 

, 26© IF XV < 

, y +1; " " ; RT 
ü66 IF y~y 
269 IF x<= 
272 IF X>= 
£75 IF X>= 
278 LET ys 
INK 6.; "1"; 
281 IF SCR 
PRINT AT X 

LET X=X+1: 
284 GO TO 
29S REH * 

300 FOR gs 
EXT 9 : BEEP 
303 PRINT 



LET bO»bo+l: GO SUB 4 

2 AND ATTR <X-l,y + D a 
LET bü=bö+l: GO SUB 4 

X-l 

2 TMEN LET ysy+1 

1 THEN LET ysy-1: GO 

>X THEN PRINT AT XV -1 

xv , y-l; " " 
1>31 THEN LET y=31-yl 
21 THEN GO TO 300 
Ö THEN GO TO 30ö 
xa+ft THEN GO TO 30Ö 
y+yl: PRINT AT x-l,y; 
AT x ,y; INK 6; "T" 
£EN$ <x+l,y) =" " THEN 
., y .; " ".: AT x-l .. y ; " " : 
ET Xax+l: GO TO 243 
25 
>X TH£N PRINT AT XV -1 

xv ,y +1.; " " 
1<0 THEN LET y =y 1 

THEN GO TO 30Ö 
xa+ft THEN GO TO 300 
21 THEN GO TO 300 
y-yl: PRINT AT x~l,y; 
AT x ,y .; INK 6; "T" 
EEN$ ix+l,y) = " " THEN 
-i,y; " ".; AT x ,y; " " : 
LET yl=0: GO TO 269 
25 

REGELUNG D. ANZAHL 
DER MAENNCHEN * 

1 TO 5: BEEP .03,0: N 
.03,-5: BEEP .03,-8 

AT x,y ; " "j AT x-l, y; " 



306 

309 

312 
315 
320 

P . 1 
323 
324 

325 

326 
327 
329 



LET 



Hiesme-l: 

THEN 



PRINT AT 0,2? 
GO TO 1480 



IF me=0 

GO TO 17 

REM * B0MBENENT5CHAERFUNG * 
BEEP .05,0: BEEP .05,1: BEE 
LET Sd=INT <RND*5) +1 
Sd=l THEN GO TO 351 
GO TO 329 
GO TO 375 
GO TO 365 
GO TO 385 
(RND #25) +1: LET 
bC=INT (RND*5)+1: LET 
D*10) 
332 LET fC=ac*bC+ec : LET gc=fc* 

bc+ec: LET hc=gc*bc+ec 

335 PRINT AT 1,2; INK 2; FLASH 
1; "GEBEN SIE X EIN ! ! '* : PRINT «0 

fc 



IF 
IF 
IF 
IF 
IF 
LET a Cs INT 

>:rnd*5) +i 



Sd=2 
Sd=4 
Sd=3 
sd=5 



THEN 

THEN 
THEN 
THEN 



fiCalNT CRN 



9C 



PAUSE 1000 
INPUT d$: IF C 
OR LEN d$>*4 



330 
IF UAL 



d$Oh,C THEN PRINT 



=•"?•■?•-?• 

339 

342 
d$ = "' 

1,0; 

TO 
345 

1,0; " 

TO 3Ö0 

346 IF UAL d$ahC AND 
BEEP .05,10: BEEP .05, 
05,30: PRINT AT X-l,y; 

" : GO TO 25 

348 IF UAL d$=hC AND 
BEEP .05,10: BEEP. 05, 
05,30: PRINT AT x-l,y; 
.; "T"; AT 1,0; " 



x 



ODE d$:>57 OR 

THEN PRINT AT 



AT 
G 



ri=l THEN 
20: BEEP . 
"1".:AT x,y 



i =2 THEN 
!0: BEEP . 
f '■; AT x ,y 



• " : GO TO 25 

354 LET aCaINT CRND*5>+1: LET f 
c=ac*ac: LET hc=fc*fc 

357 PRINT AT 1,2; INK 2; FLASH 
1; "GEBEN SIE X EIN !!": PRINT »0 
; ac; " ; "; f c; " ; ", "x : x=???" 

358 PAUSE 1000 
350 GO TO 342 

365 LET aCsINT <RND*50) : LET f c 
=INT (RND* 100) : LET gc=INT (RND* 



75) : LET h C =ä C + 
368 PRINT AT 1 



c+gc 
2; INK 



<=• 1 



FLASH 



l; "BITTE SUMME EING.!": PRINT ttö 

.; a c ; " ; ".; fc; " .; ".; gc 

370 PAUSE 10O0 

372 GO TO 342 

375 LET a Cs INT C RND* 10O) : LET f 
C=INT <RND*50) : LET gC*INT (RND* 
75) : LET h C sa C - f C ~g C 

378 PRINT AT 1,2; INK 2; FLASH 
l; "BITTE DIFF.EING. ! " : PRINT 80; 

ac; " ; "; f c ; " ; " ; gc 

38© PAUSE 1000 

382 GO TO 342 

385 LET gc=0: LET ac=INT (RND*.* 
) +1 

38? PRINT »0; INK 2; FLASH 1; "6 
ITTE ZAHL U. 1-4 EING. (3 UERS . ) " 
; PAUSE 

390 LET gc=gc+l: INPUT f«: IF C 
ODE f$>57 OR f*a"" OR LEN f $ > s* 
THEN PRINT AT 1,0; " 

" : GO TO 300 

391 IF gc»3 AND NOT UAL f**ac T 
HEN GO TO 300 

392 IF URL r$oac THEN GO TO 39 


393 IF UAL f$=ac AND risl THEN 
BEEP .05,10: BEEP .05,20: BEEP . 
05,30: PRINT AT x -1 , y ,; "1" ; AT x,y 
; "7": GO TO 25 

394 IF UAL fteac AND fiag THEN 
BEEP .05,10: BEEP .05,20: BEEP . 
05,30: PRINT AT x , y .; " " ; AT x-l,y 
; "f"; AT X,y; "f : 60 TO 25 

445 REM * PÜNKTE2AEHLR0UTINE * 

45Ö BEEP .05,-5: BEEP .05,20: B 
EEP .05,35 

455 LET SC «ssc +500: PRINT AT , 1 
3; SC 

460 RETURN 

995 REM * l.HOEHLE * 

996 REM * * = GRAFIK S * 

1000 INK 6: BORDER 0: PAPER 0: C 
LS : LET SChUÖSSe=50: LET SC=0: 
LET nes5: LET e *30 : LET X «2 : LET 

y=2: IF s$="2" THEN LET schUfiSS 
e=32 

10Ö1 LET K=l: LET C «0 : LET SC 1 = 1 
600: FOR g=l TO 5: LET CsC+4: FO 
R K=l TO 3: PRINT AT C-1,RND*24; 

INK 5;" fr": NEXT K: PRINT AT C , 
; INK 4.; ''M—M— — 1— ^H— 
AHMBaSES" : next g 

1002 PRINT AT 0,1; "SCORE: " .; S C ; A 

T 0,14.;"SHOOT : " ; s chuesse ; " ME 
N: "jme 

1003 PRINT AT >c,y; INK 3;"t";AT 
x-l,y;"f" 

1004 BEEP .0075,20: PRINT AT X,e 
; INK 6; "-" : GO SUB 105O 

1005 IF bedal THEN P RINT SO ; " 

i.hoehle BuEBBaB" - pa 

USE 1000: LET Z0=2: LET p rüg «ISO 
0: GO TO 3200 

1008 IF INKEY$b"ö" THEN PRINT AT 
X ,y; "S" : GO SUB 1020 
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fggiss. 



PRINT RT 



LET SW=i 
LET SW=2 



1Ö09 IF INKEY*a"p" THEN 
X,y;"5": GO 3UB lß30 

1012 IF INKEY$="9" THEN 
03: GO SUB 1Ö75 

1013 IF INKEY$="1 M THEN 
0: GO SUB 1075 

1016 IF RTTR <X+l,y>=69 THEN BEE 
P .05,-5: BEEP .05,20: BEEP .05, 
35: LET SC=SC+500: PRINT RT 0,7; 

";flT 0,7; SC: PRINT RT X+l,y 
:" " : IF SO «8000 THEN CLS : LET 
SC =8900: GO TO 1400 

1017 IF SOSCl THEN LET X=X+4: L 
ET SClaSCl+1500: GO TO 1003 

1018 GO TO 1003 

1020 print RT x,y;" ";RT x-l,y;" 

": LET y=y-l 
1022 IF y<=0 THEN LET y =0 
1Ö25 IF y>=30 THEN LET y=30 
1029 RETURN 
1Ö30 PRINT RT x,y;" ";RT x-l 

" : LET y=y+l 
1039 RETURN 

1050 LET ese.-l 

1051 IF RTTR <x,e)=67 OR RTTR 
,e-l)s67 THEN BEEP .05,20: BEEP 
.05,-20: LET l«e=fßa~l: PRINT RT 

FOR g*e TO 30: PRINT RT 
NEXT g: LET e=30: IF !ft€ 

GO TO 1480 

RTTR <*+!,£) =69 THEN BEE 
BEEP .05,30: BEEP .05,4 
RT x+l,e ; " " 



y 



ix 



, 3 1 ; m a : 
x,g;" " 
=0 THEN 

1052 IF 
P .05,5: 
5: PRINT 

1053 IF.e<»0 THEN LET e =30 
1060 RETURN 

1Ö75 IF SChuesse-© THEN RETURN 
1ÖS0 LET schuesseaschuesse-1: PR 
INT RT 0,, 21;" "; schuesse; " " ; RT 
X,e;"*": IF" y*8+SW+10>=245 THEN 
LET su) =243- (y *S + 10) 
1083 BEEP .09,40: BEEP .05,-10: 
PLOT y $3+10, X*S- 171: DRRU INK 5; 
SW ,0 
1084 
) =" * 
RT 
TO 30: BEEP 

,g;" " : NEXT g: LET e =30 : 
SCI THEN LET SCl=SCl+1600 
=x+4: GO TO 1003 
1085 IF SO =3000 THEN CLS 
SC =8000: GO TO 1400 
1036 PLOT y*8+10,x*3-171: 
SW ,0 



IF 5CREEN* CX , iy *S + 10+SUU /S 
THEN LET SC=SC+100: PRINT 

7;" ";RT 0,7; sc: FOR g=e 



02, -15 



PRINT RT X 
IF SO 

LET X 

: LET 
DRAU I 



NK 
1090 
1195 
1195 



RETURN 

REM * 2, 
REM * $ 



* 
* 
ts=300 



2 



HOEHLE * 
= GRRFIK 
b GRRFIK 
= GRRFIK 
= GRRFIK 
= GRRFIK 
LET 



XSl=-l: LET 



1200 LET 

ysla-1: LET unt=30.: LET XS=6: L 
ET ys=25: LET s CS =14000: LET böS 
=3: LET SU =40: LET bombe =198: LE 
T bonuS=68: INK 5: PRINT AT 2U 

?m- 

1202 PRINT RT 2© , 5 .; "ggT 
1204 PRINT RT 19,6; "££" 

0;" $3 

r;RT 16 



1203 PRIN/r RT 17,27.;": 

1210 PRINT RT 15,0;" & ^ „ 

m Sl";RT 14,0; "53 



1212 PRINT RT 13,14; "£ 

; "S" 

1214 PRINT RT 11,12; 

r;RT i^^;wsm 

1216 PRINT RT 
"Ä'JfiT 7,ö; 




9,ö; " 




;"RT 12,14 

m 



PRIN" 



6,5; " 



PRINT RT 5,28; 

,222 PRINT RT 3,0; "& 

i.RT 2,0; 



B iBT «* 4 ' J 



";RT 4,29 



1223 FLRSH 1: PRPER 1: INK 7: PR 
INT RT 12,14; 'VifiT 13,14; ,, 1" 

1224 INK 6: PRPER 0: FLRSH 1: PR 
INT RT 17,8; "4"; RT 17 , 16; "4" ; «T 
17,22; "4"; AT 13,7; "4"; AT 13,16;" 

4";RT 10,24; "4" 

1225 PRINT RT 9,29; "4"; RT 9,9; "4 
";«T 6,14;"4";RT 3,30; "4" 

1226 INK 4: FLRSH 0: PRPER 0: PR 
INT RT 19,6; "*";RT 16,28; "&" i RT 
15,3;"$";RT 14,22; "$" ; RT 13,12;" 

*";RT 10,1S;"^";RT 9,30;"$" 

1227 PRINT RT 9,3;"$ M ;RT 6,0;"$" 
;RT 5,6;"$";RT 5,28; "O"; RT 2,24; 
"$";RT 1,6; "$" : IF bed=l THEN PR 
USE 1000: LET Zö=3: LET prog=123 
0: GO TO 3200 

1228 GO TO 17 

1229 REM * 3. HOEHLE * 

* UU b GRRFIK U * 

* C = GRRFIK I * 

* $ = GRRFIK H * 

1230 LET tS=470: LET XSl*~l; LET 
ysl=-l: LET unt«50: LET XS«11: 

LET ys=17: LET S CS =20000: LET bO 
S=9: LET. Sü=0: LET borrtbe = 19S: LE 
T bönus=77: INK 2 

1231 PRINT RT 21,0; "MHttWWHN 



W ^j ifo&"?-' 6; '' 



LLI 
r lade ifPlfWllff 



RT 15,7; ",., 
;RT 13,0;" 



RT 19,10; "WWW 
";RT 18,1; "W"; RT 1 



";RT 14 



1232. PR INT. RT 16 ,.11; "SH „MtV.j. 

. _„ ,0; "'*«**« 

IIUIIIll 

um i in 



1234 PR INT RT 12 ,0; "fl 

W iHlrnTT 

1236 PR INT t RT 8,0;;"* W 

nnfnri , Hl f , , Wflfr m 

imTTTn TmHTHimn 

1238 PRINT m- 3.fl "WMW ^ 

1240 FLRSH 1: PRPER I: INK 7: PR 
INT RT 13,14; "VjRT 14,14; "I";RT 

U,i;Vt«T 12,i;"l";RT 7,8; "*" 
;RT 8,8; "i":RT. 10,30; "*";RT 11,3 

1241 FLRSH 1: PRPER 0: INK 6: PR 
INT RT 5,9; "C"; AT 10,15; "C"; AT 1 

1,21; "C";RT 18,13; "C" 

1242 "PRINT RT 7,£0;"C";RT 12,2;" 

€*';RT 3,16;"€";RT 16, 30 ;.'*€"; RT 1 

6,23; "C";RT 20,3; "C" 

1244 INK 5: FLRSH 0: PRPER 1: PR 
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-^ 



INT AT 1,0;"$";AT 2,29; "♦";AT 
22; "♦"; AT 3,17; "♦" ^ 
1245 PRINT RT 9,3;" A ";AT 5,11 
";AT 6,15j " A "jRT 8,23; "♦" 
1245 PRINT AT 11, 20; "♦" ; RT 14 
"♦";AT 16,22; "$";RT 18,23; "♦" 

18,14; "♦"; AT 20,5; "♦$" : IF b 
1 THEN PAUSE 1800 : LET 2 0=4: 

PfOg«l'2S0: GO TO 32ÖÖ 
124? GO TO 17 
1243 REM * 4.H0EHLE * 

1249 REM * 'D* * GRAFIK * 

* c~ s GRAFIK E * 

1250 LET tS=750: : LET unt*100 
ET S CS «27000: LET bOS=20: LET 
1b-1: LET ysla-1: LET SU=40: 

bü tobe =2 14: LET bpr.US*78: INK 
PRINT AT 21,0; ''fW'ni ''JAT 20, 



3, 

;■'♦ 

,7; 
; AT 
ed = 
LET 



: L 

X* 

LET 

5: 

li; 



Hi'ifi'iii" 



1252 PRINT AT 16, 29; "fW ; AT 15, 
18; "W W" ; AT 14 ,0; "f HIT 



ff'L 
0> •-iirifi'itVuri 



W; AT 6,0; "Wf ., W 
"Jat 2,0,; , * 1 rtTH' W 



WH"': RT 10, 
iH'Jii'isriii' 



arm 



ff 
nVifi' 



iti'tft'i 



IF X<19 T 



1254 LET y=5: LET x*21 

1256 PRINT AT X , y .; " , «)" : 
HEN LET do=dO+l 

1257 IF X=19 THEN PRINT AT X,y 
iTin-M . LET dOss0: LET y=y + l 

IF x<=19 THEN GO SUB 1264 
LET y=y+l: LET x=x-l 



Vf ■ 

1258 

1259 

126Ö 

1262 

1264 
• •itl'iit«» 



GO SUB 1265 



IF X<3 THEN 

GO TO 1256 

IF dö*4 THEN PRINT AT X , y 

LET ysy+1: LET do=0 
RETURN 

PAPER 2: INK, 6: 
a2=3 
TO 5 



LE 



PRINT AT al+1 
LET a2=a2+5 



1265 

1256 FLASH 1 
T al=17: LET 
1268 FOR 9=1 

,ag;"4" 

1270 LET alsal-4: 

1272 NEXT 9 

1274 PRINT AT 5,6; "4": PRINT AT 

9,3; M 4" : PRINT AT 9,25; "4'*: PRIN 

T AT 13,25; "4" 

1276: PRINT AT 17, 2; "4": PRINT A 

T 18,23; "4": PRINT AT 19,13; "i" 

1278 FLASH 0: INK 6: PAPER 1: PR 

INT AT 1,9;"*-"; AT 1 , 20; "*•" ; AT 3, 

26;"*'" ; AT 5, 16; "&•"; AT 5,1; "*•**; AT 

9,2; "o*".;flT 9,20; "o~" 
1280 PRINT AT 9 , 30; "*-".; AT 11,16; 
"o-";AT 13,1; "fl» M ;RT 14 , 19; "<*" ; AT 
14,31; "*•"; AT 16,11; "*•••; AT 17,1;" 
**";AT 17,23; "*."; AT 18, 22; "*•" : IF 

bedsl THEN PAUSE 1000: LET 
=1300: LET Zös5: GO TO 32Ö0 
17 
5.H0EHLE * 

s GRAFIK P * 
= GRAFIK * 
1300 LET h*l: LET tS=990: LET XS 
1=3: LET ysl=26: LET ys2=5: LET 
unt=127: LET S CS =37500: LET büS = 
-1: LET SU=0: LET b0mbe=2öö: LET 

bo m J S=5S: INK 3: PRINT AT 21,0; 

, s.5 ; . jnr ' AT 19 , 9 .i MAmp 

HwflW ' '_i AT 18 , 1 ; "W" ; AT 18 , 3 ; " 

ffl mmF7*T .16.3; 



Pf 09 



1282 
1295 
1296 



GO TO 

REM * 

REH * 

* 

LET 

LET 



1302 PRINT AT. 15,0; " 




ffl"; AT 14,3; "ffl 



";AT 13,3; "J 
"JBT 12,2; T" 



W 



w 



I 



SM 







PR 
AT 



Wut ™ fW lU|iMU.i 
irr nwfwniw 

1306 PRINT AT 6,0; " 
$".; AT 5,0; " 
ST.; AT 4,5; " 

mm ^ M' }RT 3,11: : !! 

iwM r W H wff .' AT 2,11; 

; ; AT 2722; "W" 

1308 INK 6: FLASH 1: PAPER 1 

INT AT 20,2;"€";AT 20, 17,' "C" ; AI 

18,30; "C"; AT 16,19; T'iflT 11,3; 

1310 PRINT AT 10,10; "C"; AT 10,25 

.;"€"; AT 3,9;"€";AT 3,24; "C^Af 2 

,29; "C" 

1312 INK 4: PAPER 0: FLASH 0: PR 

INT AT 20,5; "4"; AT 20 , 19; ,, 4" ; AT 

17,13; ,, 4"; AT 16,20; "#"; AT 15,9;" 

4" 

1314 PRINT AT 15,28; "4" i AT 14,0; 

t";AT 14,24; "4"; AT 13, 14; "4" ; AT 

13iö PRINT AT 7,10; "f j AT 7,14;" 
4'"> AT 7,30; "4"> AT 5,I; ,, #".;AT 3,1 

0; "4"i AT 3,6; "4" 

1318 PRINT AT 3,20; "4" i AT 3,23;" 
4" i AT 3,26; "4"; AT 2,14;"#".;AT 2, 
30; "4" 

132Ö FLASH 1: PAPER 1: INK 7: PR 
INT AT 17,10; "*".; AT 18, 10; "1"; AT 
17,31; "V; AT 13,31;"!"; AT 13,2; 
"*"; AT 14,2; "1" 

1322 PRINT AT 13 , 4; "V ; AT 14,4;" 
1";AT 13,22; "V; AT 14,22;"I";AT 
9,li; "*"; AT 10,11; "I" 

1323 PRINT AT 9,31; "4"; AT 10,31; 
"1 M ;AT 5,19; "a"; AT 6,19; "I"; AT 5 
,25;"A";AT 6,25; "I": IF bed=l TH 

EN PAUSE 1000: FLASH 0: LET 20=6 
: LET Pfö9=1327: GO TO 3200 

1324 GO TO 17 

1325 REM * ö.HOEHLE * 

1326 REM * § = GRAFIK R * 

* 4k = GRAFIK S * 

1327 INK 4: LET h=l: LET ts=1250 
: LET XSl=15: LET ysl=14: LET ys 
2=5: LET unts3©0: LET ys=7: LET 
XS = 18: LET S CS =s48500: LET bQS*19 
: LET SU=0: LET böffibe=214: LET b 
önus=69: PRINT AT £i,i; ;;3e ^^ 

3Ö£ yäÜCX. „ S";at 20,1 

ff-Ä ÄK"; AT^i9,is; ■•»"jfi+^j&A.i; : 



^";AT 18,6;"Ä % _ _ „ 

t 17, s; "s ; at 1», 9;; 
6,3©; "j^; AT t< 15,0; " 

1328 PRINT AT 14,18: 
•■—"*"!■• ; flT 11,11; ■■""* 

' !"; AT 9,3; ""■ 



." ; AT 12,1 

, . . ;AT 8,0; "£" 

;AT 8,25; "% . 5fS6" 

1329 PRINT BT 7,15; ,, 3^ 

;AT 5,25: 'X. . JBtLi ^T 4>23; '*.. 

";AT 3,1; ' XQPÖOP&pC ''j AT 2,5;" 
AT 2,31; "5f'; AT T75; "S' 1 ; AT l,S4;" 

3Qc" 

1330 INK 3: LET Xl=21: LET yl=2: 

LET aal 
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1332 PRINT AT xl,y !;"£": i-ET xl* 
xl-1: LET ylayl+1: LET a=a+l 

1334 IF as3 THEN PRINT AT Xl,yl; 
"3S£": LET 3*8:. LET ylsyl+1: LET 
x l»x 1—3 

1335 IF xl<4 THEN GO TO 1338 

1336 GO TO 1332 

1338 LET Xls21: LET yls30: LET d 

al 

1340 PRINT AT Xl,yl;"£": LET xl* 

xl-1: LET yl*yi~£: LET a*a + l 

1342IF a«3 THEN PRINT RT Xi,yl~ 

1;"«": LET a«0: LET ylayl-1: LE 

"T* ^ i **■ y 1 m3 

134.4 IF Xl<4 THEN 00 TO 135© 
1346 GO TO 1340 

1350 PAPER ö: INK 5: PRINT RT 1, 
31.; , > ,1 ;RT 2,2;"i|>";AT 2 ,6; "4r ; RT . 
3,14; "«fr"; AT 3,18; "*" ;AT 3,33;"*" 
1352 PRINT RT 6 , 17; "*" : RT 7,29;" 
*»"; RT 7,0;"*"; AT 8,3; "v"; AT 8,10 
; "«fr"; AT 8,21; •>■• 

1354 PRINT RT 10 , 11; "♦" ; RT 10,21 

t";RT 10,28; "*" ; AT 11,0;"*"; AT 
^4.; ,, * n :RT 13,3; ,, * M 
1356 PRINT RT 13 , 19; "*" ; RT 14 , 0; 
"i*'";AT 14,26; "*";AT 15,9;"*"; AT 
15,14; "*";RT 15,31; "♦" 
1358 PRINT RT 17 , 20; "*" ; AT 20,7; 
"*"; AT 20,25; "*" 

136Ö INK 6: PRPER 2: FLRSH 1: PR 
INT RT 2,3; "4"; RT 2,8; "4"; RT 3,2 
4;"4";RT 5,6;"i";RT 3,4; "4" 
1362 PRINT RT 10 , 16; "4" ; RT 10 , 29 

;"4";RT 11,3; ,, 4"; ;RT 14,,21;"4";A 
T 17,21; "4";RT 20,8; "4" 

1364 PRPER 1: INK 7: PRTNT RT 3, 

3l;'V';RT 4,31; "1"; AT 4,4; "V 
5,4.;"i";AT 4,18;"*"; AT 5,18; 
;RT 5,13;'*4";AT 6,13.;"I";AT 5 
; "*"; AT 6,19; "i" 

1366 PRINT RT 11,9; VJflT 12,9;" 
1";RT 11,23; ".4"; RT 12 , 23; "I" ; RT 
17,5; "a'MRT 18,5; "|"; AT 17,27; ".4 
";AT 18,27; "I";RT 19,6; "**'.; RT 20 
,6; "I" 

1367 IF bedsl THEN FLRSH 0: PAUS 
E 1Ö00: GO TO 8 

1368 GO TO 17 

140Ö IF unt»300 THEN GO TO 1500 
1402 IF unt>5 THEN PRINT RT 3,6; 

INK 5; "8EN0ETIGTE ZEIT : " .; t 
14Ö3 PRINT RT 10,6; INK 6; PRPER 

2; FLRSH l; "GUT GEMACHT, ";n*: 
FLRSH 0: PRINT AT 15,0; "SIE HABE 
N DIESE HOEHLE GEPACKT, RBER DIE 

NRECHSTE URRTET SCHON ! " : RESTO 
RE 1410: FOR 9=1 TO 43: RERD dau 

e r , h 6 e h e 

14Ö5 BEEP dauer,hoehe 

141© DRTR .5,6, .25,9, .25,9, .25,6 

, . 25 , 6 , . 5 , 9 , . 25 , 7 , , 25 , 7 , . 25 , 7 , . 2 

5 , 4 , . 5 , 1 , . 5 , -3 , . 5 , 2 , . 25 , 2 , . 5 , 6 , . 

5 , 6 , . 25 , 2 , . 25 , 4 , . 25 , 4 , . 5 , 2 , . 25 , 6 

1411 DRTR .5,6, .25,9, .25,9, .25,6 
, .25,8, ,5,9, .25,7, .25,7, .25,7, .2 
5,4, .5,1, .5,-3, .5,2, .25,2, .5,5,, 
5,6, .25,2, . 24 , 4 , , 25 , 4 , ,5,4,1,2 
1415 NEXT g: CLS : GO TO 1200+un 
t 

1480 IF IBSS0 THEN CLS : PRINT RT 
9,0.: INK 6; "GRUND : SIE HABEN NO 
CH FREDDIES" 

1485 IF NteoQ THEN CLS : PRINT R 
T 9,0; INK 6; "GRUND : SIE HABEN N 



RT 

I 
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INK 3; "DRS WA 



OCH SEC.ZEIT" 
1490 PRINT RT 6,6; 

1495 PRINT Rt'12,0; INK 4; "NUN W 

ÖLLEN UHR MRL SEHEN, OB SIE DEN R 

LTEN HIGHSCORE EINGESTELLT HABEN 

ODER OB SIE KNRPP DARAN UÖRBE 

IGERRUSCHT SIND !!": PAUSE 500 

15Ö0 CLS : LET e&Csssc-t*2: INK 6 

: PRPER 1 : BQRDER 1 : CLS : PRINT 

rt i ,8; Hä Hagmarafgrea ragni ;rt 3,1 

4; INK 7; prper 0.; flrsh l;esc 

1501 IF esoshsc THEN LET a$=n$: 
LET j«2: LET hsc*eSC: GO TO 150 

3 

1502 IF esc<hSC THEN LET j«7: GO 
TO 1503 

1503 PRINT RT 5,5; "DER HIGHSCORE 
WIRD UON ";RT 6,14; INK 5; FLRS 

H l;a$;RT 7,5; INK 6; FLASH 0; "M 

IT ";hsc;" P. GEHALTEN !!": GOT 

1503+j 

1505 PRINT RT 10,2; INK 8; PRPER 
2; FLRSH l; "HERZL.GLUECKUIUNSCH, 
";n$;AT 12,©; PAPER 1; FLRSH 0; 

"SIE HABEN EINE SUPER-PUNKTZAHL 
ERREICHT UND WERDEN DRMIT IN 
DER HIGHSCORELISTE VEREWIGT " 

15Ö7 GO TO 1512 

1510 PRINT RT 10,7; 
2; FLRSH 1; "SCHADE 

0; PRPER l; FLASH 

N LEIDER NICHT 

N HIGHSCORE ZU 



SIE DEN KOPF NICHT 



IE ES LIEBER NOCH 
1512 RESTORE 1515 
: RERD dauer,höehe 
1514 BEEP dauer,hoehe 



INK 6; PRPER 
";n$;RT 12, 

"ES IST IHNE 

GELUNGEN, DE 
KNACKEN i 
AB.ER LASSEN 
HRENGEN ! ! 
VERSUCHEN S 
EINHRL Mi" 
FOR 9=1 TO 73 



1515 DRTR 



5,7, 
.5,9 
1,9, 

5,5, 
.5,7 
5,4, 

.5,6 



5,6, 
.5,7 
75,2 
25,4 
i 5 , 5 
5,6, 
.25,, 



2, 
,4, 



.75 
.25 

, .5,6, 
, .25,4 
,.25,1 
> «5,4, 
.25, 4, 
4, .25, 



.25,4, .5,6, .5,4, 
.25,1, .5,2, .5,11 
.5,4, .25,6, .25,2 
, . 5 , b , .5,4, .5,7, 
, .5, 2,. 5, 11,. 5, 9 
.25,5, .25,2, 1,9, 

• Aw, J> , . w , "" v3 , * ö , f 

1 , . 5 , -3 , . 5 , 9 , . 5 , 



1516 DATA ,75,6, .25,6, .5,8, .25,8 
, . 25 , 9 , 1 , 9 , . 75 , 14 , . 25., 13 , . 25 , 13 , 
.25,11, .5,9, .75,11, .25,9, .25,9, . 



125,6, 
25 , 4 



0; INK 



125 . 
5,2, 



7, .2 
«5, 



"WENN 
WOLLE 



25,7, .5,6, .75,4, 
5,9, .25,11, .25,7 
6 , . 25 , 4 , 1 , 2 

1517 NEXT 9 

1518 PRINT AT 20 
SIE NOCHEINMAL SPIELEN 
N,DRUECKEN SIE BITTE <<S>>" 
1520 IF INKEY$s"S" THEN GO TO 3 
1522 IF INKEY$<>"£" THEN GO TO 1 
518 
2995 
2999 



REM 
CLS 



"RSTENBELEGUNG : 



DEFINIEREN D. UDG'S * 
PRINT RT 5,9; INK 2; " 
AT 8,6: INK 5; "R 
i CHT S - P ' ' ; "AT 8 ,19; "LINKS - " ; R 
T 12,6; "WEITER SPRUNG - W " ; AT 14 
,6; "KURZER SPRUNG - q";AT 17,6:" 
WEITER SCHU5S - 9"; AT 19,6; "KURZ 
ER SCHUSS - 1": PRUSE 500: RETUR 

N 

300© RESTORE 301Ö: FOR i =USR "T" 

TO USR "T"-l: RERD S: POKE i,S: 

NEXT i 

3010 DATA 254,126,126,60,24,24,5 

6,120 
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303© DRTR 


63 , 60 , 56 , 62 ,, 6© , 24 ,60,1 
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3108 DRTR 60,60,60,60,60,60,128, 


3050 DRTR 


127 , 126 , 126 , 24 , 36 , 66 , 9 


126 


9,119 




3109 DRTR 0,24,36,68,195,126,60, 


3070 DRTR 


252 , 60 , 28 , 124 , 60 , 24 , 60 


60 


, 126 




311Ö DRTR 170,170,168,168,40,40, 


309© DRTR 


, , 96 , 159 , 147 , 96 , , 


16 , 16 


3100 ORTfl 


127 , 254 , 126 , 60 , 24 , 24 , 2 


3111 DRTR 219,219,255,109,109,25 


8,30 




5,182,132 


31Ö1 ORTR 


16 , 16 , 16 , 124 , 254 , 254 , 2 


3112 DRTR 8,20,42,85,255,255,126 


54,124. 




.60 


3102 DRTR 


3,28,54,99,54,28,8,0 


3113 DRTR 85,231,36,24,255,24,36 


3104 DRTR 


31, 127,252,248,224,248 


,231 


. 124 , 63 




3114 DRTR 16,56,249,187,190,252, 


3105 DRTR 


153 , 153 , 153 , 255 , 255 , 82 


56 , 56 


, 82 , 82 




3116 RETURN 


3106 DRTR 


146 , 109 , 146 , 129 , 66 , 36 , 


3200 RRPER 0: CLS : LET S$= M 1" : 


56, 165 
3107 DRTR 




0,0,16,24, 63 , 126 , 255 > 6 


PRINT «0j " " .; 20 ; " .HOEH 


UE BMaaisei " : 60 to prog 



+++Neues+++Neues+++Neues+++Neues+++Neues+++Neues+++ 



von Seite 4 

Im Folgenden möchte ich zuerst die 
Möglichkeiten des SM-Kit/B beschrei- 
ben. Es sei vornweg bemerkt, daß alle 
anfallenden Ausgaben (auch eine 
Hardcopy von beliebigen Zeilenberei- 
chen des Bildschirmes ist möglich!) 
durch einen einfachen Befehl auf be- 
liebige Pheripherie gerate (wohl mei- 
stens Drucker) geleitet werden kön- 
nen. 

Die erste Funktion des SM-Kit/B , die 
ich beschreiben möchte, ist die auto- 
matische Zeilennumerierung. Diese 
Funktion braucht keinen Befehl, sie ist 
immer da. Man beginnt mit einer Zei- 
lennummer lediglich in der zweiten 
Spalte des Bildschirmes und schon 
wird, nach Übernahme dieser Zeile in 
den Speicher durch Drücken der RE- 
TURN-Taste, die nächste Zeilennum- 
mer vorgegeben. Die Schrittweite der 
Zeilennummern richtet sich dabei 
nach den schon im Speicher vorhan- 
denen Zeilen. (Das auch Vorsorge ge- 
gen, ein Überschreiben schon vorhan- 
dener Zeilen oder gegen andere Feh- 
lerquellen getroffen wurde, braucht 
wohl nicht mehr erwähnt zu werden.) 

Eine weitere dieser, auch ohne Befehl 
vorhandenen Funktionen ist die soge- 
nannte HELP-Funktion. Tritt während 
des Pro grammlauf es ein Fehler auf, 
welcher zum Programmabbruch führt, 
so wird automatisch die fehlerhafte 
Zeile gelistet und der Cursor auf die 
verdächtige Stelle gesetzt. Obwohl 
durch die Funktion nicht alle Fehler 
auf Anhieb erkannt werden können 
(man denke an Folgefehler oder Fehler 
in DATA-Zeilen, wobei dann die ent- 
sprechende READ-Anweisung geli- 
stet würde), ist sie doch ein wichtiges 
Hilfsmittel zur Fehlersuche. 



Die übrigen SM-Funktionen werden 
über einfache Befehle aufgerufen. Das 
Charakteristische an diesen Befehlen 
ist der Punkt in der ersten Spalte des 
Bildschirmes, z. B. kann man mit '.D' 
(= Delete) beliebige Zeilen (-bereiche) 
löschen. Außer Delete kann man noch 
folgende Möglichkeiten des Kits nüt- 
zen: 

'.N' (= Renumber). Dies ist die lei- 
stungsfähigste Renumberroutine, wel- 
che ich bisher erlebt habe. Man gibt 
hinter dem Befehlswort wie gewohnt 
eine Anfangs zeilennummer und eine 
Schrittweite an. Daß dieser Befehl bei 
der Umnumerierung auch die Zeilen- 
nummern hinter GOTO, GOSUB usw. 
beachtet,, gehört ja schon zur Normal- 
ausstattung eines guten Programmes. 
Aber hier wird zusätzlich die Mög- 
lichkeit geboten, einen Zeilenbereich 
anzugeben, auf welchen . allein dann 
der Renumberbefehl wirkt, während 
die -anderen Zeilen ihre Nummern be- 
halten. So ist es möglich, ganze Pro- 
grammblöcke mit einem Befehl an an- 
dere Stellen des Programmes zu ver- 
schieben. Auch hier sind wie bei der 
automatischenZeilennummervorgabe 
zahlreiche Schutzfunktionen gegen 
mögliche Fehlerquellen eingebaut! 
'.F' (= Find) gestattet es, den gesamten 
Programmtext (oder auch nur beliebi- 
ge Zeilenbereiche) nach einzelnen 
Zeichen, ganzen Wörtern und Texten, 
BASIC-Befehlsworten und Variablen 
aller Art zu durchsuchen. Alle Zeilen, 
in denen das Gesuchte vorkommt wer- 
den auf dem Bildschirm gelistet und 
sind leicht einzusehen und gegebenen- 
falls zu korrigieren. 
'.V (= Dump) gibt die Inhalte von Va- 
riablen nach einem Programmlauf aus. 
Dabei werden nicht nur wie gewöhn- 
lich die Inhalte der einfachen, sondern 



auf Wunsch auch die der indizierten 
Variablen (-felder) ausgegeben. 
'.R' oder \G' (= Trace) gestattet einen 
überwachten Lauf des Programmes. 
('.R' entspricht einem Kaltstart mit 
RUN, '.G r einem Warmstart mit 
GOTO). Hierbei werden alle Pro- 
gramm zeilen während ihrer Abarbei- 
tung durch den BASIC-Interpreter auf 
dem Bildschirm angezeigt, so daß 
leicht zu erkennen ist, an welchen 
Stellen das Programm noch nicht wie 
gewünscht arbeitet. Zu dem Komfort, 
den SM- Kit 64 bietet, gehört es, daß 
sich diese Funktion auch erst ab einer 
bestimmten Zeile an- bzw. von einer 
bestimmten Zeile ab ausschalten läßt 
und daß man sich auf Wunsch beliebi- 
ge Variableninhalte und deren Ände- 
rung während der Abarbeitung des 
Programmes auf dem Bildschirm an- 
zeigen lassen kann. 
Nun noch ein paar Worte zu den im 
SM-Kit/B implementierten Floppy-Be- 
fehlen. (Nicht die des SM-Kit/F!). Zu 
diesen Befehlen ist zu sagen, daß die 
Gerätenummer 8 softwaremäßig fest 
eingestellt ist, so daß der Zusatz ',8' 
jeweils entfallen kann. Durch einen 
PO KE- Befehl ist jedoch ein Abändern 
dieser Gerätenummer möglich, so daß 
dieses Programm auch für Datasetten- 
benutzer seinen Reiz nicht verliert. 
'.e r ist das Kommandozeichen für 
Floppybefehle. Ohne Zusätze liest die- 
ser Befehl den Fehlerkanal der Floppy 
und gibt das Resultat auf dem Bild- 
schirm aus. Man kann dem Klammer- 
affen aber auch beliebige Befehle fol- 
gen lassen (z. B. Formatier- oder 
Scratchbefehle). Damit erspart man 
sich das lästige Öffnen und Schließen 
eines Kanals zur Floppy. Aber damit 
nicht genug. Durch \e$' wird das Di- 
rectory der Diskette geladen und auf 
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dem Bildschirm (oder einem anderen 
Ausgabegerät E) angezeigt, natürlich 
ohne daß ein im Speicher befindliches 
Programm davon beeinflußt wird. 
Um Programme zu laden, stehen gleich 
drei Befehle zur Verfügung, welche 
sich in ihrer Wirkungsweise etwas un- 
terscheiden. 

'.L' lädt ein Programm von Diskette 
und entspricht dem normalen LOAD- 
Befehl. 

r .A' hängt ein Programm von Diskette 
an ein im Speicher befindliches an. (= 
Append) 

'.M' vermischt die Zeilen eines Pro- 
grammes von Diskette mit den Zeilen 
eines im Speicher befindlichen Pro- 
granimes (= MergeJ. 
Alle drei Befehle sind sowohl auf gan- 
ze Programme wie auch auf bestimmte 
Zeilenbereiche eines Programmes an- 
wendbar. 

Zum Abspeichern dient der Befehl '.S', 
welcher auf ganze Programme, auf 
Programmbereiche oder auch auf be- 
liebige Speicherbereiche (z. B. zum 
Abspeichern eines Maschinenspra- 
cheprogrammes) anwendbar ist. 
Soweit die Ausführungen zum SM- 
Kit/B. Nun noch ein paar Bemerkun- 
gen zu den anderen Teilen dieses Pro- 
grammes. 

Eine Befehlsübersicht zum -SM -Kit/M 
zeigt Tabelle 1. Obwohl alle Befehle 
sehr leistungsfähig und nützlich sind 
und nicht nur aus optischen Gründen 
(um mit soundsoviel neuen Befehlen 
zu werben!) in das Programm aufge- 
nommen wurden, möchte ich auf eini- 
ge Funktionen näher eingehen, welche 
mir ganz besonders gefallen haben. 
Eine solche Funktion ist die Funktion 
9 (INSERT/DELETE), welche es er- 
laubt, in bereits bestehende Maschi- 
nenspracheprogramme Teile einzufü- 
gen bzw. zu entfernen, wobei alle 
Sprungadressen des betroffenen Spei- 
cherbereiches entsprechend korrigiert 
werden. Ich glaube, Maschinenspra- 
cheprogrammierer wissen, welche Ar- 
beitsersparnis mit dieser Funktion 
verbunden sein kann. 
Eine heikle Sache ist die Fehlererken- 
nung bei Maschinenprogrammen. 
Sehr nützlich auf diesem Gebiet ist die 
Funktion 1 1 (TRACE), mit der man ein 
Programm Schritt für Schritt ablaufen 
lassen kann und dabei die Inhalte von 
Akku, X- und Y- Register, des Stack - 
pointers und der verschiedenen Flaggs 
laufend angezeigt bekommt. 
Ein zusätzlicher und meines Wissens 
in ähnlichen Programmen nicht vor- 
handener Service ist die Funktion 14, 
welche es ermöglicht, kleinere Ma- 
schinenprogramme in REM-Zeilen 



umzuformen und diese mit einem BA- 
Sl.C-Programm, in welchem die Ma- 
schinenroutine Verwendung finden 
soll, abzuspeichern bzw. zu laden. 
Zum Abschluß noch einige Worte zum 
SM-Kit/F. Eine Befehlsübersicht zeigt 
Tabelle 2. Alle Befehle von SM-Kit/F 
beginnen mit zwei Punkten, um sie 
von den entsprechenden Befehlen der 
anderen beiden Programmteile zu un- 
terscheiden. 

Die aufgeführten Befehle unterstützen 
den Direktzugriff auf die Diskette. Alle 
Darstellungen (z. B. des Directorys in 
Spuren und Sektoren) sind sehr über- 
sichtlich gestaltet worden, da zwi- 
schen normaler und reverser Schrift 
gewechselt wird. Neben dem Direkt- 
zugriff bietet SM-Kit/F die Möglich- 
keit, Disketten auf Zerstörungen zu 
untersuchen und gegebenenfalls zu re- 
parieren. 

Zu dem Programm erhält man ein 
Handbuch, welches, wie eigentlich bei 
allen SM -Programmen, sehr ordent- 



lich gestaltet, gedruckt und verarbei- 
tet wurde. Die vielen aufgeführten Bei- 
spiele bewirken, daß auch ein weniger 
geübter Programmierer schnell mit 
dem Programm zu recht kommen wird. 
Alle Möglichkeiten, insbesondere die 
von SM-Kit/M und SM-Kit/F wird 
aber nur der fortgeschrittene Pro- 
grammierer nutzen können. Zu emp- 
fehlen ist die Anschaffung jedoch für 
alle, welche selbst Programme erstel- 
len. Der Profi wird in seiner Arbeit 
voll unterstützt und der Anfänger fin- 
det ein Programm, dessen Fähigkeiten 
er zwar zu Anfang noch nicht voll 
nutzen kann, das aber in seiner Bedeu- 
tung mit den Fähigkeiten des Program- 
mierers wächst. SM-Software behaup- 
tet in der Werbung "Ohne SM- Kit 64 
zu programmieren, ist reine Zeitver- 
schwendung". Diesem Satz kann ich 
mich nur. voll anschließen. Der Preis 
ist mit ca. 1 40 DM im- Vergleich zur 
Leistungsfähigkeit des Programmes 
eher niedrig zu nennen. 



4. Bytes 
5 Adressen 

IQ. Find 

11 Trace # . 



v „«SNl-K»' M 



Mr Mne^ Operand 

t Adr, Adr, Aar 
PAdr, Adr 

b Adr 
zZnr. 
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Bücher-*^ 

Alles über Computer 

von Dietmar Eirich 

Ein Buch für Einsteige r: 
Das unentbehrliche Grundlagenwerk 
für alle, die einen Mikrocomputer be- 
herrschen wollen. 

Sie finden hier eine klare, verständlich 
geschriebene Einführung in die hand- 
festen Möglichkeiten der Mikrocom- 
puter - zu Hause und im Beruf. Hier 
erhalten Sie präzise und schlüssige 
Antworten auf die Fragen: 

- Brauche ich einen Computer? 

- Welches Gerät soll ich kaufen? 

- Was kann der Computer für mich 
tun? 

- Wie lerne ich den Umgang mit dem 
Computer? 

Dieses Standardwerk verschafft Ihnen 
die nötigen Grundkenntnisse und ei- 
nen aktuellen Überblick über das An- 
gebot von Geräten und Programmen, 
Hard- und Software. 
Heyne Computer Bücher Nr. 15/2, 
DM 12,80, Originalausgabe 

„Terminplanung mit 
Basic auf Commodore" 

Viele Planungen oder betriebswirt- 
schaftliche Vorgänge orientieren sich 
an Wochennummern eines Jahres. 
Dann ist es beispielsweise erforder- 
lich, zum Kalenderdatum die korre- 
spondierende Woche zu bestimmen. 
Solche und viele weitere Terminpla- 
nimgsprobleme {einschließlich kom- 
pletter Kalendererstellung) lassen sich 
mit Hilfe des vorliegenden Buches, das 
insgesamt 19 aufeinander aufbauende 
BASIC-Programme enthält, rationell 
lösen. 

Die Programme sind dabei so abgefaßt, 
daß sie auf den meisten Mikrocompu- 
tern mit BASIC-Interpreter ablaufen 
können. Die integrierten Programm- 
Listings sind auf Commodore-Compu- 
tern der Serie 2000-4000 unmittelbar 
verwendbar. Nur bei zwei Program- 
men wird ein Drucker benötigt. 
Die Mikrocomputer-Rechenprogram- 
me werden nach folgendem Schema 
entwickelt: Problemstellung - Darstel- 
lung der Programmlogik (Strukto- 
gramme) - Programm-Listing mit Bei- 
spielen zur konkreten Anwendung. Im 
Anhang rundet eine grundlegende 
Einführung in die Programmerstellung 
am Mikrocomputer die Ausführungen 
ab. Dort findet man ferner (zur leichte- 
ren Nutzung) eine Liste der in den 
Programmen verwendeten variablen 
Namen. Betriebswirtschaftlicher Ver- 
lag Dr. Th. Gabler GmbH, Wiesbaden. 
Autor: GUSTAV KASTNER 



Userecke + Leserecke + lesereck 



Ausverkauft 

Ich hätte gern gewußt, ob ich über 
Ihren Verlag noch die COMPUTRO- 
NIC-Ausgabe 9/84 bekommen kann. 
Wenn ja, senden Sie mir die Zeitschrift 
bitte nach Ihren Lieferbedingungen 

Manfred Müller, 6222 Geisenhein 

Redaktion: 

Die Ausgabe Nr. 9/84 von COMPU- 
TRONIC ist leider vergriffen. Dieses 
Heft ist sowohl im Zeitschriftenhandel 
wie auch über unsere Redaktion ab 
sofort zu unserem Bedauern nicht 
mehr erhältlich. 



Wünsche 

Hallo! Hier ist ein neuer Kunde Eurer 
Zeitschrift „Computronic". Sie ist 
wirklich super! Vor allem gefallen mir 
die vielen Programme und der niedrige 
Preis für die Doppelausgabe. Aber ich 
habe auch einiges auszusetzen. Zuerst 
einmal würde Eure Zeitschrift ein bes- 
seres Image bekommen, wenn Ihr eine 
Leserecke einrichten würdet. Beispiel: 
Fragen an die Leser (Rätsel?) oder Fra- 
gen der Leser an die Redaktion im Heft 
abdrucken, dann ein paar Tips, Tricks 
und Pokes, die man verwenden kann, 
oder auch Computerkontakte und 
Computerklubs (info's). Sonst ist Eure 
Zeitschrift echt gut gelungen. Zuletzt 
habe ich noch eine Frage. Im Heft Ja- 
nuar/Februar - Jahrgang 2 - 1 985 fand 
ich ein Spiel,, das ich schon lange für 
meinen Commodore 64 wollte. Leider 
ist es aber für den TI-99. Das Spiel 
heißt „Frogger". Könnt Ihr für mich 
und auch für die anderen Commodore 
64 Freaks dieses Spiel umschreiben 
und dann in Eurer Zeitschrift abdruk- 
ken? Euer bis jetzt zufriedener Kunde 
Harald Münzer 

Redaktion 

Wie Du siehst, haben wir Deinen Vor- 
schlag schon verwirklicht. In dieser 
Ausgabe ist bereits die Lese recke be- 



rücksichtigt. Sie soll auch in den nao 
folgenden Ausgaben ein fester B 
standteil von COMPUTRONIC bk 
ben. Hier können Wünsche, Vo 
schlage, aber auch kritische Anme 
kungen unserer Leser veröffentlich 
werden. - Das Spiel „Frogger" für d« 
Commodore 64 ist bereits im Hand 
erhältlich. Über einen großen Softw 
re- Vertrieb kann die Spielkassette b 
zogen werden: Dynamics, Hes Wa: 
oder Ariola-Soft. Wir haben ans di 
sem Grund noch keine Version vc 
Frogger für den Commodore 64 abg 
druckt. 



Wiederholung 

Seit dem Erscheinen Ihres Magazii 
„COMPUTRONIC" freue ich mich a 
jede neue Ausgabe und kann Sie 2 
diesem Blatt nur beglückwünschen. 
Nun aber zu meinem Anliegen! Nacl 
dem ich heute die neue Ausgabe d< 
„HOMECOMPUTER" erstände 

habe, muß ich zu meinem Erstaune 
feststellen, daß das Programm „Lif 
bär" für den „TI-99/4A" bereits : 
„COMPUTRONIC" Nr. 7/84 verc 
f entlicht wurde. Handelt es sich hii 
um ein Versehen von Ihnen, oder u 
einen Mangel an Software für den „T 
99"? 

Ich hoffe, daß Sie in Zukunft solcr 
Doppel-Veröffentlichungen verme 
den können. Dieter Conrad, 3554 Glai 
bach. 

Redaktion 

Sie haben recht. Das Programm „Lif 
Bär" für den TI-99 wurde bereits : 
COMPUTRONIC Ausgabe 7/84 abg. 
druckt. Wir möchten an dieser Stel 
noch einmal darauf hinweisen, daß w 
den Titel „HOMECOMPUTER" kur. 
fristig. übernommen haben. Die Redal 
tion' des Verlages hat versucht, d 
Ausgabe so zu gestalten, daß sie noc 
termingerecht bei allen Zeitschriftei 
händlern zu erwerben war. Die zwei" 
von der Redaktion überarbeitete Au 
gäbe von HOMECOMPUTER i 
selbstverständlich frei von Wiederh« 
lungen jeglicher Art. 
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^ Weltraumspiele + + ^t Brett- ^ Anwender-Software + + * Ge- 

spiele + + * Adventures schicklichkeitsspiele und und, 

und ...!! 



•• Wer wird bester Software-Autor der COMPUTRONIC des 
*• Jedes eingesandte Programm wird berücksichtigt. 



Jahrgangs 85? 



-Programme abgedruckt 



-*r"fc Die besten Einsendungen werden als Top 
und mit 120 r - DM pro Seite honoriert! 



•• Wir stelle» den Super-Champ i„ unserer Nov./De*,A US gabe vor! 



Wenn Sie in der Lage sind, gute Programme zu schreiben, versuchen Sie es. Be- 
teiligen Sie sich an unserem großen Autoren- Wettbewerb. Jedes eingesandte 
Programm nimmt an der Auswahl teil ! ! ! 

Letzter Annahmetermin ist der 30. September 1985. Der Rechtsweg ist ausge- 
schlossen. 



Zur Auswahl: 

Wir stellen in jeder Ausgabe von 
COMPUTRONIC mindestens drei 
TOPPROGRAMME, in „Homecompu- 
ter" 1 Topprogramm, vor. Hierfür trifft 
die Redaktion die Entscheidung (un- 
abhängig vom Computertyp). 
Wird ein Programm zur Darstellung 



im Heft herangezogen, zahlt der Ver- 
lag ein Honorar von DM 120,-. 
Zum Jahresende stellt die Redaktion 
noch einmal alle als TOPPROGRAM- 
ME ausgezeichneten Programme vor. 
Unsere Leser und die Redaktion wer- 
den dann in der Ausgabe Nov./Dez. 



.Bitte beachten Sie Seite 72. 



'85 das absolute TOPPROGRAMM 

des JAHRES '85 wählen. 

Der Autor des Programmes wird in 

unserer Ausgabe vorgestellt und mit 

DM 5000,- prämiiert werden. 

Wir wünschen allen Freizeitautoren 

viel Spaß beim Mitmachen. 



Einzusenden sind: 

+ + Spielbeschreibung 

+ + Datenträger 

+ + Listing (nicht unbedingt erforderlich) 



Einsenden an: 
TRONIC-VERLAG 



- Postfach 



Kennwort: Super-Software- Autor 

3444 Wehretal 1 
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den Software-Champion 1985 ! 



t . PREIS 

500C- DM 



in bar 



4.-111. Preis 

108 ABONNEMENTS von 
COMPUTRONIC 

im Wert von 35,- DM 



... Da MUSS MAN 
MITMACHEN!!! ... 



nwmachenr 





3. PREIS 



COMPUTER 
ZUBEHÖR 



ztss«** «•"*"* 
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Computer-Börse 



Verkäufe 



Atari 800XL. Software Liste 
anfordern gegen 80-Pf. -Brief- 
marke. Textverarbeitungs- 
programm. Hans-Jürgen 
Brand, bei Wulff, Keselstr. 21 , 
3000 Hannover 91 



Verkaufe TI-99/4 A + Joystick 
+ Kabel + Handbuch + Spte- 
iebuch + ca. 40 Prg. VB 
450- DM. Tel. 52 22 / 
8 43 43-Austria (nur abends) 

Verkaufe Atari 600XL + Spei- 
cheren. + Cassettenrecor- 

der+ 10Module + 6Cass.+ 
2 Joysticks. Bitte melden bei 
Tel. 02 28 / 65 73 83, ab 19 
Uhr 

♦ ♦•»♦♦♦♦-fr-fr 

♦ TOP-ANGEBOT! ♦ 
•^-Verkaufe gebrauchten -Q- 

a C64 mit Floppy-Lauf- x 
V* W erk 1541 sowie 50 Dis- V 
■^■ketten mit Top-Program- -^ 
Jörnen; viel Literatur für nur a 
" 990 DM; HES-Forth-Mo- y 
-^■dul 99 DM; MODEM Voll- -Q* 

A,dupiex 99 DM. Lieferung „Ä. 

I sofort! Anfragen nach ][ 

♦ l7.30 Uhr, Tel. 66 21 /■$■ 
>v6 33 14, Frank Brail,«^ 
yWollweberstr. 9, 6430 X 

-$*Bad Hersfeld ■$■ 

♦♦♦♦♦♦♦♦♦ 

M. Wolf, Tel. 06 41/4 14 50, 
tausche ca. 600 Programme 



M SX-64, 5 Monate aft, mit g 

M 20 Disketten zum Durch- ij 

j stöbern, VB 2800,-. Zu- j 

g schritten an: C. Lang- = 

H hammer, Bergstr. 24, m 

ü 2852 Bederkesa m 



Verk. ZX 81 (Fol.-Tast. Def .) + 
16K + Netzt. + Koaxkabel + 
Rec.-Kab. + deut. Anltg. + 
Buch M.80 Prgr., zus. 120- 
DM. Chr. Lenk, Langlütjen- 
sand4,28HB66, Tel. 04 21 / 
58 73 26 



Tandy Colour Computer, 32 

KB, für nur 500-, fast neu. 

Tel. 75 02/ 10 92 ab 18 Uhr 

Sinclair ZX Spectrum 48 K 
bei uns nur DM 448,-, Sin- 
clair QL DM 1798,-, Micro- 
drive u. Interf. je DM 199- 
bei Computer-Store, Herze- 
brocker Str. 46, 4830 Gü- 
tersloh, Tel. 52 41/1 20 80 



Verk. Tl 59 + Drucker 
PC100C + Anleitungen + 
Netzteil + 60 Magnetk. + 2 
Rollen Papier, zus. für 450- 
DM. W. Lenk, Langlütjensand 
4, 28 HB 66, Tel. 04 21 / 
58 73 26 



ATARI 600XL + Floppy preisg. 
abzugeben. Tel. 06 21/ 
56 22 41 , am Wochenende 



ZX 81, m. gr. Tast, 16 K RAM, 
64 K RAM, Drucker ZX, 3 
Software-Bücher, Preis VB 
570,-, Tel. 53 02/18 51 



Verkaufe: TI-99/4A 4- Ext. Ba- 
sic + Joysticks + Recorder + 
Kabel + Tl-Invader + dt. 
Handbuch + ca, 70 PGM. + 1 
Tl-Magazin + Chip-Buch. VB: 
700- DM. Tel.: 02 21 / 
60 76 76 



Achtung: TI99/4A + Mini Me- 
mory, Editor/Asse mbler/Dis- 
assembler. Paket nur 30 — 
DM in Scheinen an T. Mielke, 

Falkenkamp 17b, 2000 Nor- 
derstedt 1 



oooooooooooooooooo 

9. VC-20 +16K + 3K+ 2 

O 160 PR 6 + Basic-Kurs o 

o + Steckmodul + Buch, o 

§ Alles fast neu. Billig! An- g 

O geböte an: A. Zelaskow- o 

O ski, Nörenbergstr. 45, O 

§ 4630 Bochum 7 § 

OOOOOOOOOOOOOOOOOO 

DDGDDGDnnDaüüannnn 
j_j ZX-Spectrum Soft- und ° 
{=j Hardware-Neuheiten aus M 

□ England: Monty Mole, Mug- q 
D sy, Sabre Wolf usw. + o 
n Hardwareartikel. Anfrage □ 
[] lohnt sich. Gratiskatalog [_] 

□ bei: Dremasoft, Im Rosen- j=j 
a hang 6, 53 Bonn 1 □ 
GQDanDDGaaGnnaaaGG 



Tl 99/4 A Ext.-Spiel nur für Er- 
wachsene - bitte Alter ang. 
zum absoluten Preishit von 
nur DM 10,- im Umschl. an T. 
Karbach, Remscheider Str. 
18, 5650 Solingen 1 



Wenn ihr „Mugsy von Melbour- 
ne House" woilt, dann kriegt 
ihr es für 35 DM (vielleicht) 
noch bei: Jan Weigner, Carl- 

Schurz-Str. 1 1 , 2800 Bremen 
1, Tel. 04 21 / 34 63 87 



Tl 99/4A. Erstelle Druckerli- 
sting v. Ihren Programmen in 
Tl- u. ext. Basic, je Pgm. -Zeile 

4 Pf. + 2,50 DM f. Portokass. 
m. V. -Scheck o. Briefmarken 
an H. Schwab, Loch 21 , 8504 
Stein 



♦♦♦♦♦♦♦♦*♦♦♦ 

+ TRS-80/VG Pro- + 

♦ grammliste gegen Frei- a 
Umschlag. Scheve, ▼ 

+ 6842 Riedrode + 

++♦♦♦♦♦♦♦♦♦♦ 



D-64 Forth. *** 49- DM, 
Handb. 25- DM *** Info: D. 
Luda, Staudinger Straße 65, 
8 München 83 *** 



••• FLOPPY 1541 6x 
SCHNELLER ! ••* durch 
Parallelbus für C 64. Interface 

kpl. geprüft mit Software nur 
DM 179,-. Info gegen DM 
1,50 in Briefmark., B. Akes- 
son, Pf. 802, 4040 Neuss. 



Ankäufe 



J C-64. Suche Assembler, Pas- £ 

cal, Forth und andere Program- % 

• miersprachen. Tauschmaterial • 

• vorhanden. Stefan Schneider, • 

• Meerschiader Weg 1, 5275 • 
J Bergneustadt £ 



Dragon 32, suche Programme, 
z. B. Adventures, Simula- 
tions-Programme, Action-Ga- 
mes etc., Jun Kurokoshi-Krü- 
ger, . Kattendahlerstr. 36, 
4006 Erkrath 



Suche Prg.-Beschrb. Vizawrite 
64. Lösungen von Musk of the 
Sun, Twin Kindom. Das Pro- 
gramm Assl/M (Assembler) 
von D. Zabel mit o. ohne Be- 
schreibung. Tel. ab 17 Uhr 
22 92 / 36 26 



Apple II. Suche Software, evtl. 
auch Tausch. Schickt Eure Li- 
ste an Jörn Lubkoll, Boothstr. 
23 b, 1000 Berlin 45 *** nur 
Disk *** 



Suche: Gute und billige Soft- 
ware auf Diskette für 64K Ata- 
ri 600XL. Angebote an: Mi- 
chael Ebeling, Riepener Stra- 
ße 7, 3061 Beckedorf 



Suche Atari Diskettenstation, 

Aussehen egal, Hauptsache 
sie funktioniert. Bitte anrufen 
unter Berlin 30 / 

493-19 27 



Tl 99/4A Minimemory 
+ Logo gesucht. Tel. 

08 81 / 6 21 64 



Z Apple II. Bin an Soft- » 

• und Hardware für Apple • 
J II aller Art interessiert. Ul- . J 

• rieh Elsen, Am Jahnplatz # 

• 6/383, 4500 Osnabrück • 



Kontakte 



______ 



Wir haben etwas Neu- fc 

s es für Ihren Apple! Info ^ 

§ gegen 3- DM in Briefm. ^ 

^ bei Fantastic-Software, fc 

^ Abt. 9A, Grasweg 7, § 

^ 2857 Langen 3 ^ 



Kontakt mit MZ700-Leuten ge- 
sucht. Tel. 05 1 1 / 42 29 75 

OOOOOOOOOOOOOOOOOO 

o *** Atari-Spectrum- o 

O User-Club *** o 

o monatl. Info, bundesweit ' o 

O organisiert, riesige o 

§ Prog.-Bibliothek usw., g 

O melden bei: o 



o 



o 



ASUC, Am Schürhof 17 
o 4905 Spenge o 

O Tel. 52 25 / 20 68 g 

OOOOOOOOOOOOOOOOOO 

nnüDDGDDDDDnnnnnnn 

D ü 

□ Comp.-Club □ 
g Bad Hersfeld H 

□ sucht Mitglieder! n 

□ Kontakt über □ 
g Roland Reyer □ 

□ Am Giegenberg 21 □ 
o 6438 Lüdwigsau 1 n 

□ oder Jugendhaus Hers- □ 
n feld □ 

D □ 

□ DöO □□£]□□□£] □□□□□DO 



Tatisch 



• ZX-Spectrum • neue 
Programme • Tausch- 
börse • Info von S. Sau- 
er • Heideweg 8, 2720 
Rotenburg • 



Tausche/Verkaufe Atari Prg. 
16 K. Uwe Schöneberger, 

Sonnenstraße 18, 6652 Bex- 
bach 2 



Suche Software aller Art 
(Disk.), für Atari 800 XL u. An- 
tic-Hefte bis März 1984, evtl. 
auch Computer u. Analog. 
Dietmar Levenhagen, Land- 
wehr 83, 3057 Neustadt 1, 
Tel. 50 32/6 11 81 



ZX-Spectrum 

Software und Interessen- 
austausch 

Monika Baumgartner 
4021 Linz 

Postfach 142 Austria 
Bitte Liste beilegen 
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Computer-Börse [ 



Verschiedenes 



DDOaDDnanDGDaQDDQD 



ZX 81: Schluß mit den 
Clive-Sinclair-Gedächt- 
nismlnutenü DD lädt Ihre 
Programme 12x schnel- 
ler!! Für 20- DM von: 
DD-Software, Bernadot- 
testr. 45, 6 Ff m. 50, ® 
69/58 71 79 



QGDODDDGGDDGDDaDnD 

UFO-Forschung. Informa- 
tionen über UFOs etc. kosten- 
los. Suche Interessenten zum 
Aufbau einer Computer-AG (c 
64), spez. für wiss. UFO-For- 
schung! H. W. Peiniger, PF 
2361, 5880 Lüdenscheid 



VZ 200 Softw. Info g. Freium- 
schlag. W. Fischer, Friedrich- 
Str. 14, 6463 Freigericht 5 



„Load ZX81" lädt jedes 
ZX81-Prog. mit Variablen 
in jeden SPECTRUM. Die 

meisten Basic-Programme 
sind sofort iauffähig. Info 
anfordern oder sofort be- 
steilen: DM 39,-. Michael 
Naujoks, Rottmannstr. 40, 
6900 Heidelberg, Tel. 
62 21 / 4 68 85 



ZX81-Hi-Res-Toolkit, 

256x192 Grafikpunkte 
4- 16 MC-Befehle: Rot, 
Draw, Text etc., 25,- 
DM - ZX81-Turbotape, 

1 2 x schneileres Load/ 
Save, sehr sicher! 20,- 
DM. Info v. Stefan 
Schmitt, Lindenseestr. 9, 

6090 Rüsselsheim 



Kleinanzeigen 



Liebe Leser, 

wollen Sie eine Kleinanzeige aufge- 
ben? Suchen Sie einen gebrauchten 
Home-Computer, Software oder 
Kontakte zu Computer-Clubs etc.? 

Dann nutzen Sie jetzt den Klein- 
anzeigenservice von „Compu- 
tronic". „Computronic" ist die 
Zeitschrift für Home-Computer- 
Besitzer. Sie erreichen durch uns 
eine Vielzahl von Lesern im In- und 
Ausland. 

Und so wird's gemacht: 

Kleinanzeigen-Coupon ausfüllen 
(alle Zeilen können ausgefüllt wer- 
den) und 
einsenden an: 

Tronic- Verlag 

Postfach 41 

3444 Wehretal 1 

Also, schnell ausfüllen und ein- 
werfen in den nächsten Postkasten. 
Dann ist mit Sicherheit Ihre Klein- 
anzeige dabei. 




Tl 99/4A + Exbasic 
4- div. Bücher 4- 
Rec. + Kabel + Ba- 
sic-Kurs, VB 750 - 
DM. Tel.: 28 61 / 
48 45, Sa. ab 18 Uhr 



C-64-Synthesizer: ca. 40 K, 

echte Noten, Partiturediting, 
Klotenausdruck, Direktein- 
spieiung + Notenumsetzung, 
Supersound. Info von Autor 
W. Kracht, Espellohweg 38, 
2000 Hamburg 52 



Roulettesoftware f. Sharp PC 
121 1/12/4551/PC '1500. Rou- 

lettesystemprogramme »Auf 
Dauer gew.« »AD Astra« 
»Number one« «Acclaim« 
»Plein Prtve« »Accord« DM 
550,- Cass. B. Nowotny, Gise- 
lastr. 3, 8000 München 40 



An alle SF- und Fantasy- 
Freunde! Jeweils 8 Mitspieler 

für' Strategiespiele gesucht. 
Mit Gewinnchancen. Näheres 
gegen Freiumschlag von: H. 
Topf, A.-Bucherer-Straße 63, 
5300 Bonn 1 

J \. 

C-64-Forth. Diese neue 
Sprache jetzt auch f. C-64 
Cass. -Vers. DM 63,-/76 -. 
Diskvers. inkl. Handb. 
(einz. DM 25,-} D-BASIC, 
prof. BASIC erw., DM 33 - 
D. Luda, Staudinger Str. 
65, 8000 München 83 



ZX-SPECTRUM! Spie- 
lend BASIC lernen Ca. 
mit 10 Pr.+Listing-{-Er- 
klärung-f Tips+Tricks für 
denZX. 10,- DM bei 
A. Meuser, Goethestr. 
18, 5205 St. Augustin 
NEU- SUPER ZX Spiele - 



Spectrum Softw. z. B. M. Mi- 
ner 8,-; ZOOM 8,-; Liste + 
kostl. Programm anfordern, 
Karte genügt: H. Novak, Eger- 
länder PI. 19, 6053 Oberts- 
hausen 2 



TI-99/4A: ca. 90 Tl-Basic und 
ca. 80 Ex-Basic Programme 
zu verk. Info g. Rückum- 
schlag. B. Knedel, Tulpen- 
gasse 16, 3171 Weyhausen, 
Tel. 53 62 / 7 1 1 87 



FORTH-Assemblerlistings für 
alle wichtigen Mikroprozesso- 
ren je 25,- DM; Installation-Ma- 
nual 15,- DM, Autoiinker u. 
Buchhaltung f. Apple II. Ko- 
sten!. Info anf. bei B. Lipgens - 
Datentechnik, Wilbrechtstr. 65, 
8000 München 71 
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Kleinanzeigen 



Bitte veröffentlichen Sie ab nächstmöglicher Ausgabe unter der Rubrik: 
D Verkäufe □ Kontakte D Geschäftsempfehlungen 

D Ankäufe □ Verschiedenes D Tausch 

folgenden Text: 



Bitte jeweils 28 Buchstaben pro Zeile! Bitte Absender nicht vergessen! 



Preis für Kleinanzeigen: Private Anzeige 

gewerbl. Anzeige 
Chiffregebühr 



DM 5,00 je Zeile 
DM 11,00 je Zeile 

DM 10,00 je Anzeige 



NameA'orname: 



Straße, Nr.: 



PLZ/Ort: 



Datum, Unterschrift 



privat □ gewerbl. D 

{bitte ankreuzen) 
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||Jj|Vorkman versucht in „seiner" Fa- 
||||brdnung zu schaffen. Das bedeu- 
^Rir ihn, sämtliche herumliegende 
jjlrkzeuge und sonstige Teile in die 



dafür bereitstehenden riesigen Müll- 
schlucker zu befördern. Für diese Auf- 
räumungsaktionen bleiben jedoch un- 
serem „Arbeitstier" nur 60 Sekunden 
Zeit, dabei hat er auch noch weite 
Wege zurückzulegen* 1 , u. a. muß er in 
das oberste Stockwerk rasen und dann 
wieder in den Keller* 2 , da nur auf we- 
nigen Etagen Müllschlucker vorhan- 
- den sind. 
„Der rasende Malocher" sollte jedoch 
aufpassen, daß er nicht zu nah an den 
gähnenden Abgrund , (Müllschlucker) 
gerät, denn dann ist sein Leben ver- 
wirkt und seine wertvolle Arbeitskraft 
für die Fabrik verloren. 
Bleibt noch folgendes zu bemerken: 
Der Workman darf nur einen Gegen- 
stand pro Durchgang in den Müll- 
schluckern verschwinden lassen. 
Die Arbeitszeit (ursprünglich 60 Se- 
kunden) kann für unseren „rasenden 
Malocher" in Zeile 34 durch die Verän- 
derung der Ziffer 100 variiert werden. 
Zeile 34 == IFVAL (TI) 100 THEN POKE 
36869 : 240 : GOTO 88 



REM CO 


BV LRUBMRNN 




1 PÖKE36879 , 1 38 : PR I NT " Hi" 




2 PRINT" 


m LUMP! SOFTWARE *i" 




3 PRINT: PRINT" * FREUT SICH IHNEN *"' 




4 PRINT: PRINT" SEIN ERSTES PRODUKT' 1 




5 PR I NT : PR I NT n ZE I OEN ZU KOENNEN • " 


- 


6 PRINT" 

7 PRINT" 


a" 




ni i m mmmmmm v 


8 PRINT" 


sau Mi äii isiSM^aiM"" 




9 PRINT" 


mva?* % *ai ■■ mm v 




10 PRINT" 


* s m « • i au 




11 PRINT" 


s 8 » m&* j srun ii i ^ s" 




12 PRINT" 


sii mtmimmmmimm**i sas" 




13 PRINT" 


mm sii isib OME i üb 




14 PRINT" 


sa • a i" 
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15 PR1NT" &«■*#* «mm 11 

16 FR INT" «wSriTii'Wi a 
1? PRIWT' 1 »! BITTE WARTEN I " 
1 8 FORT* 1 TOS000 • NEXTT 
i 9 FÖRS-38400TO38905 • POKES , 2 ■ NEXTS 

20 FÜR3*7S80TÜ8185 

21 IFPEEKCS)>i28THEN23 

22 POKES. PEEK(S>+ 128 iDÖTD24 

23 POKES, PEEK<SJ-12B:GöT024 

24 NEXTS 

25 FORT» 1 TO4000 = NEXTT 

26 A=PEEK < 55 > +256ÜPEEK i 56 ) -86 

27 P0KE36 , A/256 J P0KE55 , AAND255 

28 P0KE54 , R/256 : PÖKE53 , ARNB255 

29 P0KEliPEEK<55> *P0KE2,PEEK<56> 

30 FORB*0TO€8 = RERDC ; PQKEA+B, C ' NEXT 

31 BRTRI73,19, 145,72,169,0,141,19, 145; 173, 17. 145, 41, 28. 74, 74 

32 DATA 133, 99, 173, 17, 143, 41 , 32, 18, 10, 5, 99 .< 133, 99, 184, 141 , 19 

33 BATR145, 162, 12?, 142,34, 145, 173,32, 145, 162,255, 142,34, 145 

34 BRTA41, 128,74, 74 > 74, 74, 5, 99, 73, 143, 133, 99, 169, 0,133, 98, 162 

35 DATA 144, 56,32, 73,220, 96 

36 R*716S : FÖRB»0TO159 : RERDC ■ PÖKER+B, C ■ NEXTB 
3"? BRTR8,8,68,37,S1, 189, 189, 153 

38 DATA255 , 1 95 , 66 , 90 , 95 , 80 , 248 , 

39 DATR0,0,60, 164, 188, 189 > 189, 153 

40 BATR255, 67, 66, 98, 258, 10, 15,9 

4 1 DRTR0 , , 60 , 252 , 68 , 1 24 , 68 , 24 

42 DATA 188, 172,244,36, 18, 173,82,36 

43 DATA 188, 172,244,36,68,44,44, 124 

44 BRTA8,8,S0,63,68,62,68,24 

45 BHTRS 1 , 53 , 47 , 36 , 72 , 1 81 , 74 , 36 

46 BATR61,53,47,36,68,52,52,62 

47 BATA129,255, 129, 129, 129,255, 129, 129 

48 DATR2B5 , , 24 , 60 , €$ ,24,0 , 255 

49 BATR255, 128, 128, 128, 128, 128, 128,255 

50 BRTA255 ,1,1,1,1,1,1 , 255 

51 BRTR255, 129, 129,255, 159, 193, 159,255 

52 BAT A60 , m , i 53 , 1 65 , 1 65 , 1 53 , 66 , 68 

53 BRTR219, 219, 8, 219,219, 0,219, 219 

54 ÜRTR255, 165, 165, 165, 165, 165, 165,255 

55 DATA255, 195, 165, 153, 153, 165, 195,255 

56 DATA 129, 129, 129, 129, 129, 129, 129,255 

57 FÖRA»7424TÜ7431 

58 POKER, 8 

59 NEXTfl 

60 PRINT"» 

61 PR INT "»VERSUCHEN SIE MIT" 

62 PRINT l, »l / WORKMflN / EINE " 

63 PR INT "»FABRIK AUFZUREIHEN ! " 

64 PRINT M »ECHME1SSEN SIE DIE" 

65 PRI NT M »HERUMLIEGENDEN TEILE" 
SS PRINT M »IIN DIE LOECHER AM" 
67 PR INT "»KOTEN DER FABRIK." 
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m PRINT "»BITTE DRUECKEN SIE" . 
m PR INT "MIDIE «RÖTE« TASTE!" 

70 I FUSR < ß K 1 28THEN78 ■ 

71 PRINTTUSIIBITTE WARTEN SIE" 

72 RR INT "HIB IS DAS HAUPTPROGRAMM"; 

73 PRINT M MWDELRDEN IST ! " 

74 PÖKE631 > 131 : PÜKE198, 1 : END 



Hauptprogramm 





i 
2 
3 
4 
5 



7 



REM <C> EV LAUBMRNN 

CLR = ?m% 1 26 = P0KE36878 ,13 

P0KE36B79, 27 : RR INT "HS" : P0KE36S69, 255 



9 

10 
11 

12 
13 
14 
15 

16 
17 
18 



PRINT" ä PUNKTE^ 
PRINT 

PRINT" S ZEIT: 

PRINT 

PRINT" Hihihi, in i 

PRINT" 
PRINT" 

PRINT" 

PRINT" 

PRINT" 

PRINT" 

PRINT" 

PRINT" 

PRINT" 

PRINT" 

PRINT" 



RUNDE : 

MAX : 



SSM 



M" 



N R 
LKKKKMJLKKKKHJLMJ 
J J J 
J J 
P Jö J 
LMJLKKM LMJLKKKKH 



J 
J 

.T 



N 



J 
J 
J 

I! 



Q 



,T 
.T 
J 
J 
J 
J 



PRINT» JLKKKKWJLKKKKKKKKKM 

PRINT" J J 

PRINT" J J 

PRINT" J R J P » . 

PRINT" LWOOaCKKKKraaaCKKKKM LS S"; 

Tlt="000000" : F«9 : K*7 : HI*»" 180" J RU*RU+1 i E*l * G08UBS8 



26 
27 
28 
29 



31 



33 
34 
35 
36 
37 
38 
29 

m 

41 



PRINT (l S9Rmilf iffi" I TIf J "I" 

FDRT«1TÖ25'NEXTT 

R£fJSR<85 : IFR*BTHEN32 

I FR« 1 THENG05UB36 ' 0ÖTD33 

IFR*2THENÖÖ8UE45 - G0T033 

I FR-4THENGÖ8UB52 * 0ÖT033 

IFR*8THENGGSUE60 * 0DT033 

IFPU-1B0THEN100 

I FVflL i T 1 § y > 1 B0THENPÖKE368S9 , 240 i ÖÖTÖ88 

G0TÖ23 

I FPEEFC < P0-43 > « 1 2ÖRPEEK C F0-45 3 * 1 3ANDPEEK < PB+22 ) » 1 8THEN38 

G0TÖ39 

P0*PB-66 ' K«7 ' F*9 i POKEPB+22 .18' FÖKEF8+44 ,10t P0KEP8+6S * 1 B : RETURN 

I FPEEK (. P0-44 J Ä32THENRETURN 

PGKEPB;10:P0*PB-22 

ÜNEG0T042.43 
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42 K*0:F=i'E=2'ÖÖTÖ44 

43 K*2'Fa3-E*i-Ö0T044 

44 RETURN 

45 I FPEEK i P0422 ) * 1 1 ÖRPEEK < P0422 ? * i 20RPEEK < P0+22 ) « i 3THENK-7 s F* 
9 * RETURN 

46 I FPEEK < P0-44 ) *32THENP0»P0+66 = PGKEP0-88 .. 32 • POKEP0-66 , 32 ■ POKEP0-44 , 
I0:OOTO48 

4? P0ssP04.22*PÖKEP0-44,i0 

48 ÖNEGÖTÖ49,50 

49 K*0-F*iiE-2^aOTÖ51 

50 K=2 ♦ F*3 i E* 1 * GÖT05 1 

51 RETURN 

52 P0*P0-i ' I FPEEK <P0+22)«32THENGOTO72 

53 PÖKEP0+ 1 , PEEK < F0-43 > : POKEP0-2 1 , PEEK C P0-43 > 

54 0NEG0T055.se 

55 k*4 : F«5 ♦ E*2 • F0KE3S876.. 128 : PÖKE3S87S, • G0T057 
5S KMA : F*6 ' E* I : F0KE36S76 , 1 28 : FGKE3S87S , : 0ÖT057 

57 I FPEEK < P0 X 1 9RNDPEEK < P8 ) > 1 3THENMP-P0- 1 : MZ*PEEK < P0 J : PÖKEMP , 
MZ ' 00SUB82 

58 IFPEEK<HP+22>*32ORPEEK(MP+22)*10THENV«32 • G0SUB76 

59 RETURN 

€0 P0*P0+1 = 1 FPEEK <P8+22>»32THENGDT072 

61 POKEP0-I > PEEK<P0-433 : P0KEP8-Z3, PEEK<P0-45> 

€2 ÖNEG0TÖ63..64 

g3 K«? : F«S = E«2 * F0KE36S76 , 1 28 * P0KE36876 ; ■ GÖT065 

64 K*7 * F*S' : E« 1 : PÖKE3687S , 1 28 ' FÖKE3S876 > * 0GTÖ65 

85 IFPEEKCP0XI5RNDPEEK<P0»i3THENMPap0+l • MZ»PEEK<P8? • POKEMP, MZ • 

G0SUB82 
SS IFPEEK(HP+22)*3ZORPEEKCMP+22)"10THENV«32 > G0SUB76 
8? RETURN 



72 PR I NT N T ■ PÖKE36869 j 240 

73 PRINT»HflBIE SIND HERUNTER-" 

74 PR INT "»BEFALLEN ! RBER" 

75 G0T091 



m PR I NT M m$ n .: TR'B ( S ) .« PU J " 1" 
€3 FR 1 NT " «8 n ; TRB « 1 9 > i RU J " 1" 

70 PRINT"»»»' ; TRB< 17) > HI* J "I" 

71 RETURN 
7fi POKEMP , V • MP*MP*22 * V*PEEK < MP ) 

77 K*PU : G0SUB85 ■ IFX<PUTHENRETURN 

78 IFPEEK<MF>*32aRPEEK<MP>«I0THENPOKEMP, HZ *• FÖRT*1TÖI0 * NEXTT • G0T07S 

79 IFE*1THENZ2*Z3 

80 IFE-2THENZ2-21 
Ö i MP*MP-ZZ ' POKEMP , M2 i RETURN 

82 IFPEEKCMP+22XM9THENRETURN 

83 PU4PU+20 • G0SUBS8 : POKEMP , 32 

84 RETURN 

85 I FPEEK <MPX>i9THENRETURN 
BS PLNP!J420-GÖSUBSeiPOKEMP-22,32-MP«MP-22 . 
87 RETURN 
38 PRINT ,, n ,| iPOKE36874i0 

89 PR INT "WO IE ZEIT MRR LEIBER" 

90 PRINT"»BCHON UM , RBER" 

91 PRINT M »BIE HRBEN IMMERHIN" 

92 PR I NT " »I« " ; PU+ 1 &m < RU- 1 > ; " *' PUNKTE » 

93 PR INT "»ERREICHT !" 

94 PR INT "»»ERSUCHEN SIE ES " 
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»Frankie goes 
ip Pharao** 

mit 3K Erweiterung 



Der Pharao befindet sich in einer mo- 
numentalen Pyramide und erwacht 
aus seinem Todesschlaf. Er flieht aus 
seiner Grabkammer und irrt in den 
zahlreichen unterirdischen Gangen 
umher, dabei wird er von zwei Mon- 
stern, die ihm freundlich gesinnt sind, 
bewacht. 

Der Eindringling „Frankie" versucht 
den Pharao einzuf angen und ihn in die 
Grabkammer zurückzubringen. Doch 
bevor Frankie dieses Unterfangen ver- 
wirklichen kann, steht ihm die Lösung 

*******3 



«3fr 



95 

BS 

9? 

98 

99 

180 

101 

102 

1 83 

104 

105 

106 

107 

188 

109 
110 
111 

112 
113 

114 
115 



PR INT "»NOCH EINMAL (araR/MEIN)" 

GETR* 

IFRfte'-J-'THENRUN 

I FR*« " H " T HENSVS648B2 

G0T09S 
PRINT M 3" * PÖKE36fifS9. 240 
PRINT'MBIE HABEN DIE VOLLE" 
PRINT"]WPUNKTZflHL , DIE IN" 
PR INT "WEINER RUNDE ERREICHT" 
PR INT "»WERDEN KANN ERREICHT!" 
PR INT "UPI B R R V ! ! M 
PRINT^IDIDWIDRUECKEN SIE DIE" 
PRINT H MI «ROTE» TASTE ZUM" 
PR I NT " » WE I TERMRCHEN ! " 
IFUSRC0K128THEN109 
PU«0 ' E%* 1 NT < RND ( 1 > #5 
0NEKG0T01 12, 113,114 



3H1 



P8=73S4 
P0*804S 
P0-7958 
GÖTO110 



G0TÖ2 
G0T02 
G0T02 



m 


mz 


B % 


% 


m m 


m 


wmm 


i 



li§ 



Ö PRIHT W 3" : F0KE35879, 14 : PÖKE36869, 240 

i print"* mm m m m 
2 print" m mm m m m 

3 PRINT" Ü SS 18 IS % 

4 print" i -i i m m m- 

5 PRINT" 

6 PRINT" ü gl jg 

? print" m mm® 
s print" m m m m 

9 PRINT" 
18 PRINT" 
11 PRINT" 
13 PRINT" 

14 print" mm m n m % 

is print u mm % m m 

ig Pklm , '■mmwmwfrm ,, 

17 PRINT"» VON MfilK JfiBLONSKI" 

18 PR INT "SAB BITTE WARTEN 

20 FORT-«? 1 SST0?23 1 : REfillR' = PÜKET , fl : HEXT 

2 1 F0RE*7424TÜ743 1 = PÜKEE , : NEXT 
30 ÜRTR24 , m , i 53 , 90 , 68 , 24 > 3S t SS 
40 DHTH24 , SB , 24 , 68 , 90 , 1 53 , 36 .. SS 
50 DfiTfl24 , 68 ■ 24 , 255 .. 24 , 24 .. 36 , 66 

68 BRTR24 , SB , 1 26 .219. 255 , 255 .. 1 95 .. 255 

70 DRTPI255, 255, 255 ,255, 255, 255, 255, 255 

80 ÜflTfi0 , , 24 , 60 , 60 , 24 , 0.-8 

90 DRTR24 , 36 , 66 , 1 29 , 255 , 255 , 255 , 255 

1 00 Dfl'Tfl'6B , 36 .- 66 , 255 .. 60 , 68 , 66 , 1 29 

1 1 ÜBT A229 ,3,0 , 230 ,1,0 

120 DflTR'233, 2, 0, 229, 2, 0, 222, 7. 8, 0. 2, 23' 

2: 0,229.- 2,0 
1 30 DflTR23S ,2,0, 230 , 2 , , 222 ,7.8.-0.2 



* 
* 
& 
& 
« 
* 
* 
* 



einiger Probleme bevor: Der Eindring- 
ling muß erst 500 -Punkte sammeln, 
ehe er bis zum Pharao durchdringen 
kann. Dies erreicht er durch das Auf- 
finden von Diamanten, die im Laby- 
rinth der Pyramide versteckt sind. Da- 
bei steht er unter enormem Zeitdruck, 
da die Monster alles daransetzen, vor 
Frankie die Diamanten zu entdecken, 
um sie zu zerstören. 
Der wagemutige Frankie hat immer 
den Tod vor Augen, denn sobald er 
eine Mauer oder eines der Monster 
berührt, wird ihm das Lebenslicht aus- 
geblasen! 



190 F*150 
200 P0KE36978, 15 
210 FORI*1TD10 
228 RERDC*B,P 



230 P0KE36376,C 
240 FORL« 1 TÜF*B = NEXTI. 
250 I FP~0THEHGOTO288 
260 PÜKF3S876..0 



************* jj 
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270 FÖRL»lTOF#p:NEXTL 

280 NEXTI 

290 PÜKESS876,0 

388' FOßT*iTO'200:NEXTT 

318 pruw u mmmmmmmmth. Anleitung ? <imfl/fi*4£iNV' 

32Ö P0KE36878, 15 

330 GET A'* : 1 F A*« " J " THENGOTO 1 0000 

349 I FA*=» " N " THENGOTO 1 G« 

350 GOT 03 30 

i 088 P0KE36879 AB- PGKE36S69 , 255 ■ FR I NT " 3" ; 

1010 DRTfL.2,S, 10, II, 15, 19/28,32, 33, 35, 37, 39, 41, 42,43, 44, 45, 46, 48, 59.52.54 

1020 TfRTFf55, 5?, 61, 70, 74, 76, 77 . 73, 83, 87, 83, 92, 96, 98, 99, 101 ,118. 120, 121 , 123. 125, 12 

?, 123 

1030 BRTR129, 138. 131, 132, 133, 134, 135, 136, 138, 146, 142, 143, 145, 162, 164, 165, 167, 168 

1040"' BATR 174, 175, 176, J.77, 178, 182, 183, 184, 186, 187,208,209,210,211,212,213,214,215 

i 050 ' DATA? 13,219 , 220 , 22 1 , 222 , 223 , 224 , 225 , 226 , 227 , 228 , 229 , 230 , , 9 , SS , 98 , 95 , 99 , 1 72 , 

176,185 

1 060 HAT A 1 09 , 262 , 266 , 27 1 , 275 , 352 , 36 1 , , 88 , 352 , 54 ,318 

iÖ7ö FÖRT=@TQ9S : READfl : P0KE38674-R, 6 = P0KE38675+A, 6 = P0KE7954-A, 4 = P0KE7955+A, 4 ■ NEXT 

1080 X»0 

1 08 1 I FX» 1 1 0THENGÜTO 1 090 

1082 U=IMTCRHDC1)*490]» :IFPEEK(?747+U)"4THENOOTO1082 
10i33 P0KE38467+U,2:P0KE7747+U,5 

1034 KxX+1 

1085 GOTO1081 

1090 P0kE38S95,7:P0KE8175,6 

Vi'm ««8121 =M*0: 33=8148 •E*38841 ^=38860: Z*8153 : V=38873:L=0 *Ü~2 : H=1;TI** ,5 000000" 

1 1 10 PRIMT"*«iaPUNKTE • M ; M ■ PRINT"»ßdHEEIT = " 1 TI* 

1119 fi=0 ■ PQKEW, 32 

1120 ö*IHT<RNDa>*4) 
1130 1FQ*0THENR*H+1 
1140 IFQ*1THENH«A-1 
1150 lFQ*2THENA*A-22 
.1 1 68 I FGMTHENfl-FH-22 

1 170 IFPEEK<W+A J«40RPEEK<W+fl)s6THENG0T01 110 

1180 W*W4A : E-E+H 

1190 P0KEE,5:P0KEW,3 

1210 Ss0:POKED,32 

1220 P*IHTCRND<1?#4) 

123Ö IFP*0THGNS**S+1 

1240 lFP=*lTHENS*8-i 

1250 IFP*2THENS-S-22 

1260 IFP-3THENSfcS422 

1 270 1 FPEEK < D+S ) =40RPEEK ( D+S ) =6TH£NÖ0T0 1210 

128Ö D«B+giK«K+S 

1298 P0KEK,5:P0KEB,3 

1291 GÖ3UB1390 

1300 Xs0:POKE2,32 

1310 G*IHTCRND<0*4> 

1320 IFG*0THENX*X+1 

1330 IFG=iTHENX*X-i 
1340 IFG*2THENX«»X-22 
1350 IFG*3THENX*X+22 

1 360 I FPEEK ( 2+X ) «4ÖRPEEK (. Z+X > «6THENG0T0 1 300 

1370 Z*2+X : V-V+X * ; 

1 386 X FH= 1 THENPOKEV , 7 : POKEZ , 7 

1331 GOTG1110 

1390 JlePEEK<37151> 
1400 PÖKE37154,127 
1410 J2ftPEEK<371523 
1 420 P0KE37 1 54 , 255 
- weiter Seite 62 — 
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Das Spiel „Thunder" ist einem 

wie er in jeder 



Nachdem der Computer den Bild- 
schirm aufgebaut hat, erwartet er die 
Eingabe eines Geldbetrages. Das 
Startkapital beträgt DM 5,00. Der Ein- 
satz pro Spiel beträgt DM 0,30. 

Nach der Eingabe beginnen sich die 
Spielwalzen zu drehen. Die erste Wal- 
ze stoppt der Computer automatisch. 
Man kann sie mit >ESC< nochmals 
weiterdrücken. Die zwei anderen 



Walzen werden mit der > SPACE <- 
Taste von Hand gestoppt. Beide Wal- 
zen können nach einmaligem Stoppen 
nicht mehr weitergedrückt werden. 
Nach dem Stillstand aller drei Walzen 
wird ausgewertet. Nach einem Ge- 
winn wird der angezeigte Betrag ver- 
größert, die Serie um ein Freispiel er- 
höht oder eine Bonusrunde gespielt. In 
der Bonusrunde müssen Sie den ange- 
zeigten Pfeil stoppen. Zeigt er nach 
links, bekommen Sie das entsprechen- 



de Kapital. Zeigt er nach rechts, geht 

das Spiel weiter. 

Ein Hinweis: 

Geben Sie das Programm und dann 
den Hex-Dump ein. Saven Sie das BA- 
SIC -Programm mit dem Befehl „SA VE 
THUNDER". Der Hex-Dump wird mit 
„BSAVE THUNDER. OBJ1, A$6000, 
L$D79" eingespeichert. 



1 TEXT : CLERR ■ HOME • POKE @,0 

2 D* = CHR.* C4) 

3 PRINT D*"BL0RD THUNDER. OB Jl" 

4 POKE £33,96= POKE 232,8= SCRLE= 

1 = R0T= 0= HCOL0R= 3 

5 REM tfBILDRUFBRU* 

6 TEXT = HOME = HGR2 = HPLOT 9,8 

T0 279,0 TO £79,191 T0 0,19 
i TO e,e 

7 HPLOT 170,0 TD 170.. 129= HPLOT 

0, 128 TO 279, 120 
R HPLOT 20,20 TO 70,20 TO 79,50 TO 
20,50 TO 20,20= HPLOT 180,20 
TO 150,20 TO 150,58 TO 100, 
50 TO 100,28= HPLOT 60,70 TO 
110,70 TO 110,108 TO 60,100 TO 
gfl" . 70 

9 VT ■ 2=HT = 25 = R* * "3 X " • GOSUB 

89 

10 VT = 4 = HT = 25 = R$ = "BONUS" •■ GOSUB 

39 

11 VT a ?=HT « 25 = R$ = "3 X "= GOSUB 

R9 

12 VT~ = 9 = HT = 25 = fl$ = "FREISPIEL 

" = GOSUB 89 

13 VT a 12=HT = 25 = R* ~ "3 X " = GOSUB 

89 

14 VT = 14 = HT » 25 = fi!£ « "GELD X 2 

"* GOSUB 89 

15 GE = 5=FR a 0: DIM SC3,3> 

16 XDRRW 1 RT 200,15= XDRRW 5 RT 

200.50= XDRflW 4 RT 200,90 

17 IF PEEK <0> * THEN GOSUB 

144 


18 VT - 20 >HT = 4 = R$ » "FREISPIEL 

E " + STRS CFR) = GOSUB 89= 
VT = 22=HT » 4 = fl* * "GELD 

" + STRS CGE) = GOSUB 8 
9= VT « 18=HT = 4 = RS * "SPIEL 
ER " + Nfl* = GOSUB 89 

1 9 REM *HHUPTR0UT I NE* 

20 VT = 22 = HT == 4 = RS ~ "GELD 

" + STR* CGE> = GOSUB 83 
•21 GE * GE - .3= IF GE < =0 THEN 
FOR I * 1 TO FR-GE * GE + . 
3= HEXT 

22 IF GE < ==0 THEN RS * "GAME 

OVER" = VT = 12=HT « 16= GOSUB 
89 = END 

23 VT s 22 = HT = 4 'HS === "GELD 

" + STRS CGE> = GOSUB 89 

24 FOR I = 1 TO 3'GCI) = = HCI> * 

0= HEXT =BL = 0=K ~ 0»U - 

25 ESC * 0= FOR I = 1 TO 3 

26 IF H( I) = 1 THEN 29 

27 G<I> « INT < RHD Cl> * 5) + 1 

28 IF GCI> = 3 OR <GCI) == 2 RND 

RND < 1 > < . 75 ) THEN 27 

29 NEXT 

30 FOR I - 1 TO 3= IF HCl) * 1 THEN 

32 

31 OH GCI) GOSUB 41,46,0,51,56 

32 HEXT 

33 b PEEK C - 16384) - 128= IF 

ö > 1 THEN GOSUB 61 

34 FOR I = i TO 3= IF HCl) = 1 THEN 

35 0N GCI) GOSUB 41,46,0,51,56 

36 NEXT 
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Geldspielautomaten nachempfunden, 
Gaststätte zu finden ist 




2? IF RND <I> < .9 THEN 25 

38 IF K = > i THEN 25 

39 K - K + t'I * K = H<K> =1= IF K 

a 3 THEN 97. 

40 ON G<K> GÜSU8 4 1,46 ..9, 5 1.56= GOTO 

25 
4! REM *KR0NE ZEICHNEN* 

42 IF I = 1 THEN XDRflW 1 RT 25, 

38: RETURN 

43 IF I * 2 THEN XDRflW i AT 105 

,3(3' RETURN 

44 IF I =3 THEN XDRflW 1 AT 65, 

80 

45 RETURN 

46 REM * JOKER ZEICHNEN* 

47 IF I b i THEN XDRflW 2 RT 35, 

25' RETURN 

48 IF I = 2 THEN XDRflW 2 AT 115 

,25; RETURN 
4* IF I b 3 THEN XDRflW 2 AT 75, 

75 
50 RETURN 
51. REM *BIRNE ZEICHNEN* 

52 IF I « i THEN XDRflW 4 AT 40, 

30: RETURN 

53 IF I «2 THEN XDRflW 4 RT 120 

,30= RETURN 

54 IF I = 3 THEN XDRflW 4 AT 80, 

80 

55 RETURN 

56 REM * >7< ZEICHNEN* 

57 IF I * 1 THEN XDRflW 5 AT 35, 

25= RETURN 

58 IF I « 2 THEN XDRflW 5 AT 115 

,25= RETURN 

59 IF I = 3 THEN XDRflW 5 AT 75, 

75 

60 RETURN 

61 REM *STEUERNUNG* 

62 IF * 32 RND K * > i THEN 6 

8 

63 IF < > 27 THEN €? 

64 IF K < > 1 THEN 67 

65 IF ESC * 1 THEN 67 

66 ESC = l=H<tO = 0'K » K - 1 

67 POKE - 16368,0= RETURN 

68 K « K + 1-ST » ST + l'HCIO * 1 

: IF K * 3 THEN 97 

69 GOTO 67 
70' REM *BONUSRUNDE* 



71 POKE - 16368,9 

7? FOR I « 1 TÖ 278= HCOLOR« 3« HPLOT 
I + 1,121 TO I + 1,190= HCO'LOR« 
0: HPLOT 1,121 TO 1,190: HCOLQR» 

3: NEXT 
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73 HCOLOR« 3 

74 RS * " i 2 5 1.8 

2@ 58 100 "»VT a 17= HT 
* 1 • GOSUB 89 

75 RT<1> = 16 = RT<2) = 48 = PF » 40 = 

PF<1> == 143*PF<2) » 152 = M a 
1 = RP == 1 

76 RÖT« RTCRP?: XDRRW 3 RT PF, PF 

<RP> = FOR I « 1 TO 28= HEXT 

77 K ===== PEEK < - 16384)= IF K = 1 

66 THEN 80 

78 XDRRW 3 BT PF, PFC RP) = RP = RP + 

1= IF RP > 2 THEN RP = 1 

79 GOTO 76 

80 POKE - 16368,0 

8t IF RP « 2 THEN GE == GE + DM = D 
M a 0= GOTO 84 

82 H<1> ===== = H<2> = 1 = HC3> = 2 = HC4 

> a 5 = H(5> « 10=H<6) « 20 = hK 

7 5 = 58 = H<8> « 100 

83 DM a H<M):M = f1 + 1=PF = PF + 

40= XDRRW 3 RT PF - 4@,PF<RP 
>= =RP a i: GOTO 76 

84 FOR I == 1 TO 278= HCOLOR« 3= HPLOT 

I + 1,121 TO I + 1,190= HCOLOR« 
0= HPLOT 1,121 TO 1,190= HCOLOR« 
3= NEXT ■ ROT= 

85 VT a 20=HT « 4= RS a »FREISPIEL 

E " + STRS <FR) = GOSUB 89= 
VT a 22 = HT a 4 = RS ===== "GELD 

" + STRS <GE)= GOSUB 8 
9= VT a 18=HT a 4 = RS = "SPIEL 
ER " + HR$= GOSUB 89 

86 GOTO 19 

87 EHD 

88 REM «SCHRIFTBILD* 

89 FOR l « 1 TO LEN <R$> 

90 BS a MIDS (RS,I,l;.:B a BSC C 

BS? 

91 IF B a 32 THEN 95 

92 IF B » 46 THEN HCOLOR« 3= HPLOT 

HT * 7 + 2, VT * 8 + 6= GOTO 
95 

93 T.F B > 57 THEN XDRRW B - 49 RT 

HT * 7, VT * 8= GOTO 95 

94 XDRRW B - 42 RT HT * 7, VT * 8 



95 HT « HT + 1: NEXT 

96 RETURN 
REM «GEW I NNRUS WER TUNG* 
IFG(i)=2 THEN S * 4 
IF G<1> = 4 THEN 8 = 2 



97 
98 
99 
U10 

101 

102 
103 
1.04 
105 
106 
107 
108 
1.09 



IF G<1> = 



IF G<2) a 
IF G<2) a 

IF GC2> « 

IF G<3> a 
IF G<3> « 
IF GC3) = 
IF G< 1 > a 



a 4 



THEN S a 
THEN T a 

THEN T a 
THEN T a 
THEN 

THEN U a 2 
5 THEN U a 3 
1 THEN S = 1 
IF G<2). a l THEN T = 1 
IF G<3> a 1 THEN U « 1 



110 
111 

112 
113 
114 
f. 15 
116 
117 
IIB 
119 
120 
121 
122 
123 
124 
125 
126 
127 
128 
129 
1.30 
131 
132 

133 

134 

135 

136 
137 
138 

139 

140 
141 



DM a GE=FS a FR 
IF S « 1 HND T a t RND U « 1 

THEN 70 
IF S a 1 flND T a i RND U « 2 

THEN GE a ge + \ 
IF S a 1 RND T a i RND ü a 3 

THEN GE a GE + 1.5 
IF S = 1 RND T a i HNO U « 4 

THEN 70 
IF S a l RND T = 4 RND U = 1 

THEN 70 
IF 8 a 2 RND T a £ RND U * 2 

THEN GE a GE * 3 
IF S a 2 RND T a 4 HND LI a 2 

THEN GE « GE * 2 
IF S = 2 RND T a 2 RND U = 4 

THEN GE a GE * 2 
IF 8 a 3 RND T a 3 RND U a 3 

THEN FR a FR + 1 
IF S a 3 RND T a 4 RND U * 3 

THEN FR a FR + 1 
IF S a 3 RND T a 3 RND U a 4 

THEN FR = FR + 1 
IF S a 4 RND T = 4 RND U a 4 

THEN FR a FR + 3 
IF S a 4 RND T a 2 RND U « 4 

THEN GE a GE + .3 
IF 8 a 4 RND T a 4 RND U « 2 

THEN GE = GE + .3 
IF S a 4 RND T a 4 RND U a i 

THEN GE a GE + .3 
IF S a 4 RND T a 1 flND U = 4 

THEN GE = f-E + .3 
IF S a 4 RND T a 3 RND U « 4 

THEN GE a GE + »3 
IF S a 4 RND T a 4 RND U « 3 

THEN GE » GE + .3 
IF S a 4 RND T = 1 RND U a 1 

THEN 70 
IF S a 4 RND T = 2 RND U ■ 2 

THEN GE a GE * 3 
IF S a 4 RND T a 3 RND U * 3 

THEN FR a FR + 1 
VT = 20=HT « 4= RS a »FREISPIE 
LE " + STRS <FS)i GOSUB 89 

VT a 2Ö=HT a 4= RS ■ "FREISPIE 
LE " + STRS <FR>: GOSUB 89 

VT a 22: RT a 4 : r$ s "GELD 

" + STRS <DM>» GOSUB 89 

VT a 22=HT a 4:R$ = »GELD 

" + STRS CGE>= GOSUB 89 

FOR W a 2 TO STEP - 2- HCOLOR= 

W= FOR I a i TO 49 

HPLOT 28 + 1,21 TO I + 20,49 

HPLOT 100 + 1,21 TO 100 + I, 

49 

HPLOT 60 + 1,71 TO 60 + 1,99 

NEXT I,W 

FOR I a i TO 2000= NEXT 
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142 GOTO 19 


6068- 


81 01 01 81 85 01 01 81 


143 REM *RNFfiHG* 


6078- 


01 01 05 81 01 01 81 01 


144 VT o 16<HT « 5= FOR I = 1 TO 


6078- 


05 02 83 87 07 83 03 03 


3- HPLOT HT * 7 - 4, VT * 8 - 


6080- 


07 03 07 83 03 03 07 83 


2 TO HT * 7 + 8, VT * 8 - 2 TO 


6888- 


07 03 03 83 07 03 07 03 


HT * 7 + 8.« VT * 8 + 18 TO HT 


6090- 


03 03 87 03 07 03 03 03 


* 7 - 4, VT * 8 + 18 TO HT % 


6098- 


07 03 07 03 03 03 07 06 


7 - 4, VT * 8 - 2:HT a HT + 2 


68rö- 


05 01 85 01 05 01 01 01 


' NEXT 


60A8- 


05 81 05 81 Öl 81 05 01 


145 fi = 4%'Q s 5= POKE - 16368,0 


60B0- 


85 Ol 01 01 85 Ol 05 01 




60B8- 


01 01 05 01 05 01 81 01 


146 VT s lg:HT = Q:fl$ - CHRS <H> 


60C0- 


05 01 05 01 05 82 83 87 


i GÖSUB 89 


60C8- 


03 03 07 83 83 03 83 03 


147 S - PEEK < - 16384>= 1F 8 < 


68D0- 


07 83 03 03 83 83 87 03 


128 THEN 147 


60D8- 


03 03 03 03 07 83 83 03 


148 RR = fl 


60F0- 


03 03 87 83 83 03 83 83 


149 IF S * 136 THEN R = fl - 1 


60E8- 


07 83 83 86 05 81 81 81 


150 IF S * 137 THEN fl « fl + 1 


68F8- 


81 01 01 81 01 01 01 81 


151 IF S a 141 THEN 158 


68F8- 


81 01 01 01 01 81 01 01 


152 IF S < > 136 ÄND 8 < > 137 


6180- 


01 01 01 01 01 81 81 01 


THEN POKE - 16368.. 0' GOTO 


6108- 


01 01 01 01 01 01 01 01 


147 


6t lö- 


85 82 03 87 03 83 03 87 


153 IF fl < 48 THEN fl * 90 


gt 18- 


07 83 07 07 03 83 83 07 


154 IF fi > 90 THEN fl = 49 


6120- 


87 87 83 83 03 87 03 03 


155 IF fl > 57 AND fl < 65 AND S - 


6128- 


87 87 07 03 03 87 07 07 


136 THEN fl * 57 


6130- 


83 83 03 87 03 03 83 86 


156 IF fl < 65 AND fl > 57 AND S * 


6138- 


85 81 01 85 01 05 81 01 


137 THEN fl » 65 


6140- 


05 01 01 85 01 05 01 81 


157 VT s 16:HT » Q=fl* = CHR* <ftfl 


6148- 


05 01 85 81 01 01 05 01 


>= GOSUB 89' POKE - 16368,0 


6158- 


81 81 81 81 81 8*5 81 85 


» GOTO 146 


6158- 


01 Ol 01 01 05 02 83 87 


158 Hfl* = Nfl* + CHR$ <fl>=Q = ß + 


6160- 


83 83 83 83 87 03 87 83 


2 


6168- 


83 83 03 03 07 07 83 03 


159 POKE - 16368, ©■• IF Q > 9 THEN 


6170- 


03 87 83 83 87 07 87 03 


161 


6178- 


03 87 87 87 03 07 03 03 


160 GOTO 146 


6180- 


03 07 83 86 05 01 85 85 


161 HCOLORa 


6188- 


05 05 05 81 85 01 01 01 


162 FOR I « VT * 8 - 2 TD <VT + 


6190- 


01 05 01 81 01 01 05 81 


1> * 8 + 2- HPLOT 10,1 TO 80 


6198- 


01 01 85 81 81 81 01 01 


, !■■ HEXT 


eiflä- 


01 05 01 85 01 01 01 01 


163 HCOLOR= 3* POKE 8,1= RETURN 


61A8- 


05 82 03 87 83 83 83 87 




61B8- 


87 03 07 87 03 03 03 07 


JCflTflLOG 


61 B8- 


07 67 03 87 87 87 83 03 


61C0- 


83 83 07 83 03 03 03 07 




61CS- 


03 07 83 83 83 87 03 86 


DI8K VOLUME 254 


61D0- 


85 01 01 81 01 01 01 01 




6108- 


01 01 81 01 81 01 01 81 


XflLL-151 


61E0- 


81 01 01 81 81 01 01 01 




61E8- 


01 81 01 01 81 81 81 81 


*6006.6D78 


61F8- 


01 81 01 01 85 82 83 07 




61F8- 


07 07 07 87 07 07 07 87 


6800« 29 00 54 08 1D 82 D6 83 


6280- 


87 07 07 87 07 87 87 07 


6008- D3 04 7C 05 95 06 C6 06 


6288- 


07 07 07 07 87 07 87 87 


601Ö- F7 06 28 07 59 07 8fl 07 


6210- 


87 07 07 87 87 87 07 87 


601.8- BB 07 EC 07 1D 08 4E 08 


6218- 


87 07 87 86 88 81 81 81 


6020- 7F 08 B0 88 El 88 12 09 


6220- 


81 05 85 85 85 85 85 85 


6028- 43 09 74 09 A5 09 D6 09 


6228- 


85 85 05 85 81 81 81 81 


6038- 07 0A 38 8fl 69 8fl 9fl Ofl 


6230- 


01 81 .82 83 03 03 83 83 


6038- C:B 8fl FC 0fl 2D SB 5E 08 


6238- 


03 87 83 03 03 83 03 83 


6040- 8F 0B C0 0ß Fl 0B 22 SC 


6240- 


03 03 03 83 03 07 03 03 


6048- 53 0C 84 SC B5 SC E6 8C 


6248- 


02 81 01 05 01 01 81 81 


6050- 17 ÖD 48 0P 79 8D 01 01 


6250- 


81 81 81 81 81 01 01 01 


6053- 01 01 05 Ol 01 81 01 01 


6258- 


01 85 01 81 81 81 82 83 


6868- 85 01 01 01 01 81 05 01 
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6260- 

6268- 
«270- 
6278- 
6288- 
6288- 
6298- 
6298- 
62H0- 
6288- 
62B8- 
62B8- 
62C8- 
62C8- 
62D0- 
62D8- 
62E8- 
62E8- 
62F8- 
62F8 

6300 

6308 
6310 
6318 

6329 
6328 
6330 
6338 
6340 
6348 
6350 
6358 
6360 
6368 



03 

07 
03 

01 

01 
01 

07 

03 
06 

01 
01 

03 
03 
03 
01 

05 

01 

07 
03 



03 03 



03 

85 



03 
07 

01 



6370- 
6378- 
6388- 
6388- 
6398- 
6398- 
6SA0- 
6388- 
6380- 
63B8- 
63C8- 
63C8- 
63D8- 
63D8- 
G3E8- 
63E8- 
63F0- 
63F8- 
6400- 
6488- 
6410- 
6418- 
6420- 
6428- 
6430- 
6438- 
6440- 
6448- 
6450- 
6458- 
6460- 
6468 



- 02 

01 

01 
03 
83 

03 
05 

01 
01 
03 

07 
02 

01 

01 

87 
07 
03 
05 

01 

01 



03 
07 

02 

01 
01 
03 

07 
03 

01 
01 

03 
03 
05 
83 
07 
05 
05 
07 
07 
85 
03 
07 

01 
01 

03 

03 

- 05 



01 01 

01 02 

03 83 
07 07 

05 01 
01 01 
05 01 

03 87 
03 03 
03 07 
05 05 
05 85 
01 02 
03 83 
03 03 

01 01 
01 01 
05 01 

03 03 
07 07 
03 07 

01 01 
01 01 
01 02 

03 87 
07 07 

01 81 

01 01 

01 01 

07 07 
03 07 
07 83 
01 05 
05 01 

01 06 

07 07 
03 03 

01 05 
05 01 
01 01 

83 07 
03 07 
87 07 

01 61 

01 01 

83 87 

02 01 

05 05 
83 83 
07 87 
05 85 

01 01 

07 07 

02 85 
05 05 

03 03 
07 83 
01 05 

01 01 
07 07 

02 81 
85 05 



03 87 03 
03 83 87 
03 82 01 
81 81 85 
05 01 05 
03 03 03 



03 07 
id? 07 
05 05 

01 05 
05 01 

87 03 



07 


07 


07 


03 


03 


07 


03 


03 


07 


03 


85 


01 


01 


01 


01 


01 


01 


01 


01 


01 


05 


01 


01 


82 


03 


03 


07 


03 


83 


83 


03 


03 


03 


03 


03 


03 


86 


85 


81 


05 


05 


85 


05 


05 


85 


05 


01 


85 


01 


05 


03 


03 


03 


03 


87 


07 


83 


03 


83 


03 


07 


03 


03 


07 


87 


05 


01 


01 


01 


85 


01 


01 


05 


01 


81 


01 


01 


01 


02 


03 


03 


97 


03 


03 


03 


07 


07 


87 


03 


03 


83 


02 


01 


01 


01 


01 


01 


01 


01 


01 


01 


85 


01 


01 


01 


03 


03 


03 


03 


83 


07 


87 


87 


07 


07 


07 


07 


03 


83 


03 


01 


01 


01 


01 


01 


01 


01 


01 


81 


81 


01 


01 


01 


02 


03 


03 


07 


07 


87 


83 


03 


03 


07 


07 


03 


03 


82 


01 


81 


81 


01 


01 


05 


01 


05 


05 


01 


01 


01 


05 


83 


07 


07 


87 


83 


83 


83 


87 


87 


03 


07 


03 


07 


83 


03 


01 


05 


01 


05 


01 


85 


01 


05 


01 


05 


85 


01 


01 


06 


87 


03 


07 


07 


07 


03 


03 


03 


07 


07 


83 


03 


02 


80 


01 


01 


01 


05 


81 


01 
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Verbindungskabel für V24/RS232- 
Schnittstellen weisen auf beiden Sei- 
ten Stecker auf, da die Geräte jeweils 
mit Eingangsbuchsen bestückt sind. 



Ist ein Kabel einmal für eine Anwen- 
dung zu kurz; dann muß ein neues 
besorgt werden, denn die Kabel kön- 
nen nicht, wie man es vom Netzkabel 
gewöhnt ist, ineinandergesteckt wer- 
den. Um diesem Problem abhelfen zu 
können, hat die Firma BAUZ den Ver- 
längerungsadapter PERDREH- V ent- 
wickelt. Der Adapter weist an beiden 
Seiten 25pol. Sub-D-Buchsen auf, die 



1 zu 1 miteinander verbunden sind. 
Damit können auf beiden Seiten Kabel 
mit Steckern aufgesteckt werden. Mit 
Hilfe des Adapters PERDREH-V kön- 
nen also zwei zu kurze Schnittstellen- 
kabel zu einem langen Kabel einfach 
zusammengesteckt werden. 

Nähere Information bei: BAUZ GmbH 
Postfach 13 29, 2730 Zeven 
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CASTLE 



Finden Sie den Schlüssel zur nächsten Runde! 



Dieses Spiel befördert Sie in einen La- 
byrinth, wo Sie einen Schlüssel errei- 
chen müssen, der Ihnen die Tür zum 
nächsten Raum öffnet. Dabei müssen 
Sie jedoch darauf achten, daß Sie nicht 
von dem Monster eingeholt werden. 
Dessen Aufgabe ist es nämlich, den 
Schlüssel zu bewachen und Sie an der 
Flucht in den nächsten Raum zu hin- 
dern. Als zusätzliche Schwierigkeit 
muß das Ganze auch noch in einer 
bestimmten Zeit erfolgen. Ist es Ihnen 
gelungen, den Schlüssel zu erreichen, 



fliehen Sie sofort zum Ausgang im lin- 
ken oberen Bildbereich. Auf diese Art 
haben Sie den nächsten Raum er- 
reicht. Es gibt insgesamt zehn ver- 
schiedene Räume innerhalb des Cast- 
les. 

Die Steuerung erfolgt über die Tasta- 
tur: 

Ctrl-H: links Ctrl-J: unten 

Ctrl-I: rechts Ctrl-K: oben 

Space: Schluß 

Achtung, vor Beginn des Spiels 



müssen Sie folgende Eingabe täti- 
gen: 

POKE 103,0 : POKE 104,64 : Poke 

16384,0 

Geben Sie nun die HEX-DUMPS ein 

und S AVEN Sie mit folgenden Namen: 

Hex-Dump - 1C00-1FFF ■ BS AVE 

CASTLE.OBJ4,A$1COO,L$400 

Hex-Dump - 0303-0315 : BSAVE 

CASTLE.OBJ3,A771,L19 

Hex-Dump - 9000.93AF : BSAVE 

CASTLE.OBJ2,A$9000,L$3B0 
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REM HIGHSCORE ERSTELLER 

TEXT •- CLERR = HOME 

Pf? INT UHR* C4)"0PEN CASTLE. OB 

Jl" 
PRINT CHR* (4)"WRITE CASTLE. 



5 PRINT 180 

6 PRINT CHR* <4>"CLOSE" 







220 


XDRRW D2 RT Cflfi - 1> % 10, < B 


10 


GOTO 1020 




B - 1> * 10 


ZW 


FÜR I = 8 TO 15 


230 


GrtTD 90 


30 


FÜR T = TO 27 


240 


R - R - 1= IF R < 1 THEN R - 


40 


IF fl(I + 1,T + 1) = THEN 60 




1 






250 


POKE - 16368,0= GOSUB 1320 


50 


XDRRW fl< I + 1 , T + 1 > FIT T * 1 


260 


IF R'iB.flj = 1 OR R(B,fl> = 5 OR 




0,1 * 10 




RCB,R) = 10 THEN R = fl + i 


60 


HEXT T..I 


270 


Dl - &■ RETURH 


70 fl = 2=ß = 3 = E>i = 7 = MX = 27 = MV = 


280 


fl = fl + 1= IF fl > 27 THEN fl = 




15= MO = = 0. = 




27 


80 


POKE - 16368,9= WH IT - 1638 


290 


POKE - 16368,0= GOSUB. 1320 




4,128 


38 PI 


IF RCB,R> - 1 OR fl<B,R) = 5 OR 


90 


XDRRW Dl RT <fl - 1 > * 10, CE - 




fl<Bifl) = 10 THEN fl = R - 1 




1> * 10:flfl = R = BB = B = D2 = D 


31.0 


Dl - ?■■ RETURH 




1 


320 


B = B + 1= IF B > 15 THEN B = 


100 


VTflB 22= HTflB 1= PRINT "ZEIT 




15 




•■ "; INT CTI>" ".: = HTflB 15 = 


330 


POKE - 16368,0= GOSUB 1328 




PRINT "LEBEN = "LI.;= HTflB 2 


340 


IF fl<B,R> = 1 OR R<B,fl) = 5 OR 




5= PRINT "PUNKTE ■ "SC 




RCB,fl) = 10 THEN B = B - 1 


118 


TI == TI - .5 = IF TI = THEN 


358 


Dl = 8= RETURH 




ftf-10 


360 


B = B - 1= IF B < 1 THEN B = 


120 


X = PEEK f - 16384) :X = X - 




1 




128 


370 


POKE - 16368,0= GOSUB 1320 


130 


IF X ~ 9 THEN GOSUB 240= GOTO 


330 


IF RCB,fl> = 1 OR RCB,fl> = 5 OR 




180 




RCB,fl> * 10 THEN B = B + 1 


1.40 


IF X - 9 THEN GOSUB 280= GOTO 


390 


Dl = 8= RETURN 




130 


400 


IF MV < B - 3 OR MV > B + 3 THEN 


150 


IF X = 10 THEN GOSUB 329= GOTO 




RETURN 




180 


410 


POKE - 16368,8 


160 


IF X = 11 THEN GOSUB 360= GOTO 


420 


IF MX < fl - 3 OR MX > fl + 3 THEN 




180 




RETURN 


1?0 


IF X = 32 THEN GOSUB 400 


430 


HCOLOR= 3= HFt-DT -:R - 1) * 1 


130 


IF fi<B,fl> * 3 THEN SC = SC + 




+ 5,-::b - l'> t 16 + 5 TO (M 




100= GOSUB 1260= XDRRW 3 RT 




X - 1) * 10 + s,aiv - I) * i 




<r - n * i0..>:b - i> * i0 = R<: 




+ 5 




B,fi> = 


440 


FOR I = 1 TO 500= NEXT 


190 


IF FKB,R) = 2 THEN GOSUB 53 


450 


HCOLOR= 0= HPLOT CR - 1> * 1 









+ 5,<B - 1 ■> * 10 + 5 TO CM 


200 


IF fl<:B,fi> = 9 THEN 880 




x - n * le + s,a-iv - i) * i 


210 


IF HOT MO THEN GOSUB 580 




+ 5 



52 



Computronic 




460 


MO == 1 




998 


470 


XDRflW 4 fl'T <MX - 1> * 10,aiY 


1000 


IF fl* = "J" THEN HOME = GOTO 




- i> * 10= SCfiLE= 2 




1070 


480 


XDRflW 4 AT (MX - 1> * 18,<MY 


1010 


PRINT D4="GPEN CASTLE. OBJ 1" 




- 1> # 10 




' PRINT D*"WRITE CASTLE- OB Jl 


498. 


GOSUB 1298 




"= PRINT HC= PRINT D*"CLOSE" 


500 


XDRflW 4 RT <MX - 1 > * 18, (MY 




= TEXT = HOME • END 




- i> * 16= SCALE« 1 


1820 


TEXT = CLEfiR = HOME 


sie 


MV = 500: MX = 500 


1030 


DIM fl<16,28> 


520 


RETURN 


1040 


P* « CHR* <!4> = LI = 3 = SC = 


530 


fKl,4> = 9 = FKB,fl:> == 8 






540 


XDRflW 2 AT <fl - 1) * 10, <ß - 


1050 


PRINT D*.;"OPEN CASTLE. OBJ 1" 




1) * 10 




= PRINT Mi "READ CASTLE. OB Jl" 


550 


XDRflW 10 AT 38,0 




= INPUT HC= PRINT D*"CLOS£" 


560 


GOSUB 1310 


1060 


PRINT D*.;"BLOflD CASTLE. 0B.J3 


570 


RETURN 




n 


580 


IF HOT Q THEN XDRflW 4 AT < 


1870 


FOR I * 1 TO 40= PRINT "*"=- 




MX - 1) * 10,c:MY - 1) * 18 




= NEXT ■■ FOR I = 1 TO 3= HTflB 


590 


Ml = MXiM2 = MV'Q = 1 = CH » 1 




1' PRINT "%";■■ HTAB 40= PRINT 


680 


IF fl < MX THEN MX - MX - 1= GOSUB . 




"*" = = NEXT = FOR I = 1 TO 40 




730= IF CH THEN 680 




: PRINT "t"i •■ NEXT 


610 


CH = 1 


1088 


fl* = "UWE RUNKEL PRESENTS .. 


620 


IF fl > MX THEN MX = MX + 1= GOSUB 




... CASTLE OF DOOM <C> 




730= IF CH THEN 680 




COPYRIGHT <05. 11.1 984 > BY UW 


680 


CH = 1 




E RUNKEL • AM SCHEIBELRCKER 


640 


IF ß > MV THEN MV = MY + 1= GOSUB 




6 ■■- 3568 BIEDENKOPF 2 / TEL. 




758= IF CH THEN 689 




■■<. 06461 > 8547 " 


650 


CH = 1 


1090 


T = 33= FOR I == 1 TO 36 


668 


IF ß < MV THEN MY = MY ~ 1 * GOSUB 


1 100 


VTflB 3= HTflB T= PRINT MD* 




750= IF CH THEN 688 




<fl*,l,I)= FOR Z = 1 TO 168= NEXT 


670 


CH = 




= T = T - 1= NEXT 


680 


XDRflW 4 AT 01X - i) # 10..CMY 


111.8 


T = 8' FOR I = 1 TO 149 




- 1> * 18 


1128 


VTflB 3= HTflB 3= PRINT MIO* 


690 


XDRAW 4 AT < Ml - 1 > * 10,<M2 




CA«, 1,36). i 




- 1 ) * 10 


1130 


FOR 2. - 1 TO 108= HEXT 


700 


IF CH THEN GOSUB 1388 


1140 


IF I > 114 THEN T = T + 1= PRINT 


710 


IF TD THEN 838 




SPCC t:j 


720 


RETURN 


11.50 


NEXT 


730 


IF A<MY,MX> = 10 OR FKMY,MX> 


1168 


fl* = "PRESS ANY KEY TO START 




= 5 THEN MX « Ml'CH » 




« 


740 


GOTO 768 


11.70 


VTflB' 3 i HTflB 3= PRINT fl* 


750 


IF A<MY,MX> - 10 OR FKMY,MX> 


1.188 


fl$ b HID* <fl*,2) + LEFTS (. 




= 5 THEN MY * M2=CH == 




fl*, 1 "> 


760 


IF MX = A AND MY = B THEN TD 


1190 


VF PEEK < - 16384:'' > 128 THEN 




= 1 




1218 


770 


RETURN 


1288 


FOR T ===== 1 TO 58= NEXT ■• GOTO 


780 


READ TI= IF TI = 




1.170 




- 1 THEN RESTORE = GOTO 788 


1218 


PRINT D*"BL8flDCA3TLE.0BJ2" 


790 


FOR I = 1 TO 16= FOR T = 1 TO 


1228 


PRINT DS"BL0flDCA3TLE.0BJ3" 




28 


1230 


PR I NT D4 " BLOflDCflSTLE . OBJ4 " 


300 


READ Aa,T:J= NEXT T, I 


1248 


POKE - 16368,8 


810 


L = L + 1= HOME 


1250 


HGR = HCOLOR« 3= POKE 233,1 


820 


GOTO 28 




44= POKE 232,9= R0T= 0= 8CRLE= 


830 


LI = LI - 1= IF LI = 8 THEN 9 




1= GOTO 738 




38 . 


1260 


POKE 8,58= POKE 1,5= CALL 7 


840 


GOSUB 1330 




71= POKE 0i 260' POKE 1,5= CALL 


85S 


TD = 




771= POKE 0,108= POKE 1,5= CALL 


860 


IF TI = THEN TI = 50 




771= POKE 0,18= POKE 1,5= CALL 


870 


XDRAW Dl AT <R - 1> * 18,(B - 




771= POKE 0,238= POKE 1,5= CALL 




1) * 18=fl = 2=B - Z- GOTO 98 




771 






1270 


RETURN 


880 


SC = SC + TI= VTflB 22= HTflB 1 


1288 


CALL 7496= RETURN 




< PRINT "ZEIT = ".; INT CTI )" 


1298 


CALL 7455= RETURN 




" = = HTflB 15= PRINT "LEBEN = 


1.300 


CALL 7423= RETURN 




"LI.;= HTflB 25= PRINT "PUNKT 


1318 


FOR I = 1. TO 10= CALL 7303 = 




E = "SC 




NEXT = RETURN 


890 


FOR I = 1 TO 1000 • NEXT 


1320 


POKE 8,50= POKE 1,5= CALL 7 


900 


HOME = VTflB 22= HTflB 10= PRINT 




71= RETURN 




"LEVEL *"L"* GESCHAFFT !!!" 


1338 


CALL 7434= RETURN 


910 


FOR 1 = 1 TO 1000= HEXT 


1348 


DATA 100 


928 


SC = SC + 500= GOSUB 1288= HGR 


1350 


DATA 10, 10, 18, 18, 18, 18, 18, 1 




= GOTO 788 




0, 10, 10, 10, 10, 18, 10, 10, 10, 10 


930 


TEXT = HOME 




, 10, 10, 10, 10, 10, 10, 10, 10, 18, 


948 


INVERSE = PRINT ">»»»»» 




10,10 




» ENDRESULTATE ««««««. 


1360 


DATA 5,0,0,8,0,0,0,0,8,0,-0, 




<" 




0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 


950 


NORMAL 




0.0.5 


^60 


VTflB 3= PRINT "SCORE = ".=.30 


1370 


DATA 5*. 0, , 8, 0, 0, , 8 , , , 5, 


978 


VTflB 5= PRINT "HI-SCORE = "> 




0.0, 0,0, 5, 0,8,0, 3, 8, 18, 18, 18 




HC 




,18,18,8,5 


980 


IF SC > HC THEN VTflB 7= PRINT 


1380 


DATA 5,8,0,8,8,0,0,8,5,0,5, 




"NEU HI-SCORE = "sSC=HC = SC 




8,0,0,0,5,0,8,0,0,0,0,0,8,0, 
5,0,5 
DATA 5,0,0,0,0,0,0,0,5,8,5, 


990 


VTflB 10= PRINT "HOCH EIN SPI 


1398 




EL ?";i GET fl* = PRINT H* = IF 




0,0,0,0,5,0,0,8,0,5,0,0,8,0, 




fi* < > "J" AND fl* < > "H" THEN 




5,0,5 



Computronic 



53 




1 480 DATA 5 .. .. .. .. .. .. ,0,5 , .. 5 , 

0.0.0.0,5,0.0,5 .. .. .. .. .. .. .. 

5,0.-5 
1410 DflTR 5,10,10.. 10.. 10.. 10, 10,0, 

5- 0,5, 0,0, 0,0, 5, 10,10, 10,0,0 
.0.0.0.0,5,0,5 
1420 DflTR 5,0,0,0,0,0,0,0,5,0,5, 

0,0,0,0,0,0,5,0,0,10,0,0,0,0 

,5,2,5 
1430 DATA 5,0,10,10,10,10,10,10, 

5.0, 0,0, 0,0,0, 5, 0,5,0, 0,0,0, 

0,0,0,5,0,5 
1440 DATA 5,0,0,0,0,0,0,0,5,10,0 

■fi, 0,0, 0,5, 0,5, 0,0, 0,0, 0,0,0 

,5,0,5 
1450 DATA 5 , 1 ,10,3,10,10,10,10, 

5, 10, 10, 10, 10, 0,0,5,0,0,5,0, 
0,0,0,0,0,5,0,5 

1460 DATA 5,0,5,0,0,0,0,0,5,6,0, 

0,5,0,0,5,0,0,5,0,0,0,0,0,0, 

5,0,5 
1470 DATA 5,10,10,10,10,10,10,0, 

5,0,5,0,5,0,0,5,0,0,5,0,0,0, 

0.0,0,5,0,5 
1480 DATA 5,0,0,0,0,0,0,0,5,0,5, 

0,5,10,10,5,0,3,5,0,0,10,10, 

10, 10, 10,0,5 
1490 DflTR 5,0,0,0,0,0,0,0,0,0,5, 

0, 0,0, 0,0, 0,0, 5, 0,0, 0,0, 0.-0 , 

0,0,5 
1500 DATA 10,10,19,10,10,10,10,1 

0, 10, 10, 10, 10, 10, 10, 10, 10, 10 
,10,10, 10, 10, 10, 10, 10, 10, 10, 
10, 10 

1510 DflTR 15© 

1520 DATA 10,10,10,10,10,10,10, 
10. 10, 10,10, 10, 10,10, 10, 10, 1 

0, 10, 10, 10, 10, 10, 10, 10, 10, 10 
,10,10 
1530 DflTR 0,0,0,0,0,0,0,0,0,0,0 
,0,0,0,0,0,0,0,0,0,0,0,0,0,0 

.0,0,0 
1540 DATA 0,5,0,5,0,5,0,5,0,5,0 

,5,0,5,0,5,0,5,0,5,0,5,0,5,0 

,5,0,5 
1550 DflTR 0,0,0,0,0,0,0,0,3.0,0 

, , 0, 0, 0,0,0, 9 ,0,0,0,0,3,0,0 
. . . 
1560 DflTR 5,0,5,0,5,0,5,0,5,0,5 
.0,5,0,5,0,5,0,5,0,5,0,5,0,5 

,0,5,0 

1570 DflTR 0,0,0,0,0,0,0,0.0,0,0 

,0,0,0,3,0,0,0,9,0,0,0,0,8,0 

,0,0,0 
1530 DATA 0,5,0,5,0,5,0,5,0,5,0 

,5, 0,5,0, 5, 0, 5, 0, 5,0,5,0,5, 

.5,0,5 

1590 DflTR 0,0,0,0,3,0,0,0,0,0,0 
,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
,0,0,0 

1600 DATA 5,0,5,0,5,0,5,0,5,0,5 
.0,5,0,5,0,5,0,5,0,5,0,5,0,5 
,0,5,0 

1610 DflTR 0,0,0,9,0,0,0,0,0,0,0 

,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
.0,0,0 

1620 DATA 0,5,0,5,0,5,0,5,0,5,0 
.5,0,5, 0, 5,0,5,0,5,0,5, 0, 5, 
.5,0,5 

1630 DATA 0,0,0,0,0,0,0,0,0,0,0 
.0.0,0,0,0,0,0,0,0,0,0,0,0,0 
.0,0.0 

1640 DATA 5,0,5,0,5,9,5,0,5,0,5 
,0,5, 0,5, 0/5, 0,5, 0,5, 0,5, 0.-5 

,0,5,0 

1650 DATR 0,0,0,0,0,0,0,0,0,0,0 

,0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0 
,0,0,0 

1660 DATA 0,5,0,5,0,5,0,5,0,5,0 
.5.0.5.0.5.0.5.0,5,0,5,2,5.0 
,5,0,5 

1670 DATA 10,10,10,10,10,10,10, 
10, 10, 10, 10, 18, 10, 10, 10, 10, 1 

0, 10, 10, 10, 10, 10, 10, 10, 10, 10 
,10,10 

1680 DflTR 200 



1690 DfiTfl 16, 10, 10, 10, 10, 10, 10, 

10, 10, 10, 10, 10, 10, 10, 10, 10, 1 
0, 10, 10, 10,10, 10, 10, 10, 10. 10 
, 1.0, 10 

1700 DflTR 5,0,5,0,0,5,0,0,0,0,0 

.0,0,0,0,0,0,0,0,0,0,0,0,6,0 
.0.0,5 

1719 DflTR 5 , ,5,0,0,5,2,5,10,10 

. 10, 10, 16, 10, 10, 10, 10, 10, 10, 
10, 10, 10, 10, 10, 10, 10, 0,5 

17;?0 DflTR 5,0,5,0,0,5,10,5,0,0, 

0,0,0,0,0,0,0,0,0,0,0,0,0,0, 
0,0,0,5 

1730 DATA 5,0,5,0,0,5,0,0,0,5,1' 
0, 10, 10, 10, 10, 10, 10, 10, 10, 10 
. 10.10,10, 10, 10, 10, 10,5 

1 740 DATR 5,0,5,0,0,5,0,10,1 9, 5 

.0,0,0,0,0,0,0,0,0,0,0,0,0,0 
,0,0,0,5 

1750 DATA 5,0,5,0,0,5,0,8,0,0,0 
,5,10,10,10,10,10,10,10,10,1 
0,18,10, 10,10,10,3,5 

1760 DATA 5,0,5,0,9,5,10,10,10, 
10, 10,5,6,0,0,0,8,0,0,0,0,0, 

0.0,0,0,0,5 

1770 DATR 5,0,5,0,0,5,0,3,0,0,0 
. 0,0, 10, 10, 10, 10, 10, 10, 10, 10 

,10,10,10,10,10,10,5 

1790 DATA 5,0,5,0,8,5,0,0,0,0,0 
,0,0,0,0, 0,0, 0, 5, 0,0, 0,5,0, 8 
.0,3.5 

1790 DATA 5,0,5,0,0,5,10,10,10, 

1.0, 10, 10, 10, 10,10,10, 10,0,5, 

0. 5. 8.5, 8, 5, 0,0, 5 
1800 ' Dfltfl 5,0,5,0,0,0,8,0,3,6,0 
,0,8,0,0,0,5,0,5,0,5,0,5,0,5 

,0,0,5 

1810 DflTR 5, 0,5, 0,0, 0,0, 8, 0,0.0 
, 8,0. 0,0,0, 5, 0, 0,0,5, 0, 0,0, 5 
.0.0,5 

1820 DATA 5,0,10,10,10,10,10,10 

. 10, 10, 10, 10,10, 10, 10,0, 10,1 
0,10,10,10,10,10,10,10,0,0,5 

1.P.30 DATR 5,0,0,0,0,0,0,0,0, 0, 
,0,0,0,0,0,0,0,0,0,0,8,0,0,0 

.0,8,5 
1840 DATA 10,10,10,10,10,10,10, 

10, 10, 10, 10, 18, 10, 10, 10, 10, 1 
0, 10, 10, 10, 10, 10, 10, 10, 10, 10 

,18,10 
.1850 DATA 200 
1860 DATA 10, 1.0. 10, 10i 10, 10^10, 

10, 10, 10, 10, 18, 10, 10, 10, 10, 1 

0, 10, 10, 10, 10, 10, 10, 10, 10, 10 
,10,10 

t870 DATA 5,0,0,0,5,0,3,5,10,10 
, 10, 18, 10, 18, 10, 10, 10, 10,0,0 

,0,0,0,0,0,0,0,5 

1A80 DATA 5,10,10,0,5,8,0,5,0,0 
.0,0, 0,8, 0,0, 0,0, 0,0, 8-' 0,0, 8 
,8,0,0,5 

1890 DATA 5,8,0,0,5,0,0,5,0,10, 
10, 10, 10, 10, 10, 18, 10, 19,0,0, 

0.0,0,0,0,0,0,5 

1900 DATA 5,0,10,10,5,0,0,5,8,5 
' .0.0,0, 0,8,0, 0, 5, 0,0,0,0,8,0 

,0,0,0,5 

1910 DATA 5,0,0,0,5,0,0,5,8,5,0 

,10,10,16,10,10,0,5,0,0,8,0, 
0,6,0,0,0,5 

1920 DATA 5,10,10,0,5,0,0,5,0,5 
,0,5,2,0,0,5,0,5,0,8,0,3,0,0 
,0,0,0,5 

1930 DATA 5,0,0,0,5,8,0,5,0,5,0 
.10, 18, 10, 0,5,0, 5, 8,0, 8,0,0, 

0,0,0,0,5 

1940 DATA 5»0, 10, 10, 5, 0,0v 5, 0,5 
,0,0,0, 0,0, 5,8,5, 8,0, 0,8,0, 8 
,0,8,8,5 

1950 DATA 5,0,0,8,5,0,0,5,0,5,1 

0, 10, 10, 10,10,5,0,5,0,0,0^8, 
0,3,0,0,0,5 

1968 DATA 5,10,10,0,5,0,0,5,0,0 
.0,0,3,0,0,0;0,5..0..0,0/0je.'0 

,0,0,0,5 
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1 970 DATA 5.. 3, 0,8,5,0,8,10,10,1 
0, 10. 10, 10, 10.. 10.. 10, 10, 10,0, 

0.0,0, 0,0.. 0,0, 0,5 

1980 DATA 5,0,10,10,5,0,0,0,0,0 

, , , 0.. 8 , , , 0, , , 0, 0, 9 , , 
,0,0,0,5 

1998 DATA 5,0,8,0, 5,0,8,0,0,0.. 

,0,0,8,0,0,0,0,8,0,8,0,0,0,0 

.0.0,5 
2900 DftTR 5,18, 10 j8.' 0.-0; 0.-0.-0. -0 
,8, 8, 0,0, 0,0, 0,8, 0,0, 0,0, 0,0 

.0,0,0,5 

2010 DATA 10, 10, 18,. 10, 18, 18, 10, 

18, 18, 10, 10, 10, 10, 18, 10, 10, 1 

0,18, 10,18, 10, 18, 18, 18, 10,18 

,10,18 

2020 DATA 258 

2030 DRTfl 10, 10, 10, 10, 10, 10, 10, 
10, 18, 10, 10, 18, 10, 10, 10, 10.- 1 
8 . 18, 10, 18, 10, 10, 10.- 10.- 10.- 10 
,10,10 

2848 DRTfl 5,0,0,0,0,0,0,0,0,0,0 

,0,0,0,0,0,8,0,0,0,0,0,0.'0>3 
,0,0,5 

2850 DfiTfi 5,0, 10,8, 10, 10, 10, 10, 
10, 10, 10, 10, 10, 10, 10, 10,10,1 
0, 10, 18, 10, 10, 10, 10,0, 10,0, 5 

2060 DRTR 5,0,5,0,0,0,0,0,0,8,0 

,R. 0.0. 0.0, 0,8, 0,0, 0,0, 0,8,0 

.5.0.5 
2870 DRTR 5,8,5,0,10,0,10,10.10 

, 10, 18, 18, 10, 10, 10, 10, 10, 10, 

10, 10, 10, 10,8, 10,0,5,0,5 
2880 DRTR 5,0,5,8,5,0,0,0,0,0,0 

,8,6, 0,0, 0,0, 0,0, 0,0, 0,0, 5,0 

,5,0,5 
2R90 DRTfl 5,0,5,0,5,8.. 18,0, 18,1 

8, 10, 18, 18, 10, 10, 10, 10, 18, 18 

, 10,3, 10,0,5,8, 5,0,5 
2108 DATA 5,0,5,0,5,0,5,0,0,0,5 

,0,0,0,5,0,0,0,5,9,0,5,0,5,0 

.5,0,5 
21.10 DATA 5,0,5,8,5,0,5,8,5,0,0 

,0,5,0,0,0,5,0,8,0,0,5,0,5,8 

,5,8,5 
2120 DRTR 5,0,5,8,5,0, 18,0, 18, 1 

0, 18, 10, 10, 10, 10, 10, 10, 10, 10 

,10,2,10,3,5,8,5,8,5 
2130 DRTfl 5,0,5,0,5,0,0,0,0,0,0 

, 0, , , , , 0, , , , , , ' 5, 

'.5'. 8, 5 

2148 DATA 5,0,5,0,10,0,10,18,10 
, 18, 10, 10, 10, 10, 10, 10, 10, 10, 
10,18, 18, 10,0, 10,8,5,0,5 

2150 DATA 5, 0,5, 8,0, 8,0, 0,0, 8,0 

,0,0,0,0,8,0,3,0,0,0,0,8,0,0 

,8,0,5 
2168 DATA 5,0,18,0,10,10,10,10, 

1.0. 1.0,10, 10, 10, 10, 10, 10,10,1 
0, 10, 10, 10, 10, 10, 10,0, 10,0,5 

2178 DATA 5, 0,0, 0.-8, 0,0, 0,0.. 0.3 
,8,8,8,8,0,0,8,0,0,0,8,0,0,0 
.0,8,3 

2180 DATA 10,18,10,18,10,10,10, 
10, 10, 18, 10, 10, 10, 10, 10, 18, 1 
0, 1.0, 10, 10, 10, 10, 10, 10, 10, 10 
, 10. 18 

2198 DRTA 208 

2208 DRTA 10,10,10,10,10,10,18, 
10, 18, 10, 10, 10, 10, 18, 10, 10, 1 
0, 10, 10, 10, 18, 18, 10, 10, 10, 10 
,10,18 

2218 DATA 5,8,0,0,0,0,0,0,0,3,0 

.0,0 .0.0,0, 0,8, 0,0,0, 0,0,0,0 
,0,0,5 

2220 DATA 5,8, 18,0, 10,0, 10, 0, 18 

,8, 10,0, 10,0,10,0, 18, 0, 10,8 , 

10.0.10,0, 10,0,8,5 
2230 DATA 5,8,0,0,8,0,0,0,0,0,0 

,0,0,0,8,0,3,8,0,0,8,0,0,0,0 

,0,0,5 
2240 DATA 5, 0,5, 0.-5, 0,5, 0,5, 8, 5 

,8,5,0,5,0,5,0,5,0,5,8,5,0,5 

,0,0,5 



2250 DATA 5, 0,0, 0,8, 8, 0,0, 8, 0,0 
. 0, 0, 0,0,0,0,0,8, 0,0, 8,0,0, 
.0.0.5 

2260 DATR 5,0,10,0,10,0,10,0,18 

,0,10,0, 10,0,10,0, 10,0,10,8, 

10,8, 10,3, 10,8,0,5 
2270 DRTfl 5,0,0,0,8,0,0,0,0,0,0 

,0,8, 0,0, 0,8, 0,0, 8,0, 8, 0,0,0 

,0,0,5 
2288 DRTfl 5, 0,5, 6,5, 9, 5,0,5; 0, 5 

.0.=., Pf. 5- 0.5, 0,5, 0,5, 0,5, 0,5 

.0,5,5 
2290 DATA 5,0, 0, 0,0,0,0,0,0,0,0 

,0,0, 0,0, 8, 8, 0,0, 0,8, 0,0, 0,0 

,8,3,5 
2308 DATA 5 , 8 , 18 , 8, 18 , 8, 1 8 .• 8 , 1 8 

.8,10,0, 10,0, 18, 8, 18, 8, 10,0, 

10,0, 10,8.. 10,8,0,5 
2318 DATA 5,0,0,0,0,0,8,0,0,0,0 

.«,0.0, 0,8, 0,8, 0,0. .0,0, 0,0,0 

.0.0,5 
2320 DftTR 5,8,5,0,5,0,5,0,5,0,5 

,0,5,0,5,8,5,0,5,0,5,0,5,8,5 

,8,8,5 
2330 DATA 5,0,0,8,0,0,0,0,0,0,0 

,0,0, 0,8, 8, 8,0, 0,8, 0,0, 0,0,0 

•0.0.5 
2340 DATA 5,3,0,0,0,0,0,0,0,0,8 

,0,0,0,0,0,0 , €1, .• ,8,0,8,0,0 

.0.2,5 
2358 DATA 10,10,18,10,18,10,10, 

10, 10, 10, 10, 10, 10, 10, 10, 10, 1 

8, 18, 18, 10, 10, 10, 10, 18, 18, 10 

. Jft. 1« 
2360 DATA 150 
2370 DATA 10,18,18,10,10,18,18, 

18, 18, 18, 10, 10, 18, 10, 18, 18, 1 

0, 18, 10, 10, 10, 18, 10, 10, 18, 18 
.10,1.0 

2388 DATA 5,0,5,0,0,5, 8 ,8,0,2 , 

, 8,0, 0, 0,0,0,0, 0, 0, 8,8, 0.. 0, 

,0,0,5 
2390 DATA 5,8,0,5,0,8,5,0,8,8,0 

,8,8,8.. 8,8, 3, 0,0, 8,0, 0,0, 8, 8 

,8,8,5 
2488 DATA 5,5,0,8,5,0,8,5,8,8,8 

,8,0,0,0,0,8,0,0,8,0,8,8,8,8 

,0,0,5 

2418 DATA 5,0,5,0,0,5,8,8,5,8,8 

,0,0,0,8,0,0,0,8,0,0,0,0,8,0 
,0,0,5 

2420 DATA 5,0,0,5,8,8,5,8,5,10, 
10, 18, 1.0, 10, 18, 10, 18, 10, 18, 1 

0.0.0.5,0,8,5,8,5 

2438 DATA 5,8,0,0,5,8,8,8,5,0,3 

.8.0.0.0,0,0,8,0,5,0,0,5,0,0 

,5,8,5 
2448 DATA 5,0,8,0,0,5,0,0,5,8,0. 

,0,0,8,0,0,0,0,0,5,8,8,5,0,0 

,5,0,5 
2458 DATA 5,0,0,8,8,8,5,0,8,5,1 

8, 18, 18, 10, 10, 10, 10,0,0,5,8, 

0, 5, 0,0, 5.. 8,5 
2468 DATA 5,0,0,3,3,8,0,5,0,0,5 

, 8, 0, 8,0,0,5, 0,0,5,3, 0,5,0, 

,5,8,5 
2478 DftTA 5, , 8, 3 , 8, 8 , 0, , 5, 0, 

,5,8,0,0,0,5,8,0,5,0,0,5,8, 

2488 DATft 5,0,0,0,0,0,0,0,8,5,8 
,8,5, 18, 10, 10,10,8,0,5, 10,10 
,5,0,0,5,10,5 

2498 ' DATA 5,0,0,0,0,0,8,8,8,0,5 
,8,0,0,0,0,0,0,0,0,8,0,0,0,0 

■8,0,5 
2580 DATA 5 .8,8, 0,0, 0,8, 0,0, 0,0 

,5,10^10,10,10,10,0,0,0,0,0, 

6,0,0,8,0,5 
2518 DATA 5,0,0,0,0,0,0,0,8,0,0 

,0,0, 0,0, 0,0, 0,0, 8,8, 0,0, 0,0 

.0.0,5 
2528 DATA 10,10,18,18,10,10,10, 

10, 10, 18, 10, 10, 10, 10, 10, 10, 1 

8, 18, 10, 10, 10, 18, 10, 10, 10, 18 

. 18, 19 
2538 DATA 288 
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2540 


DRTR 19.. 10, 10,10,10,10,18, 




,0,8,5 




10, 10, 10, 10, 10, 10, 10, 10, 10, 1 


2880 


DRTfl 5,3,5,8,5,0,5,8,5,8,5 




0, 1.0. 10. 10. 10. 10. 10. 10. 10. 10 




,0,5,8,5,8,5,8,5,8,5,8,5,0,5 




,10,10 




.0.0.5 


2550 


DRTR 5,0,0,0,0,0,0,0,0,0,0 


2ftl0 


DRTR 5,0,5,8,5,3,5,0,5,0,5 




,0,0,0,0,5,0,0,0,0,0,0,0,0,0 




,8,5, 0,5, 8, 5, 3, 5, 8,5, 8,5, 8,5 




,0,0,5 




.0.0.5 


256Ö 


DRTR 5,0,0,0,0,0,5,0,0.3,0 


2820 


DRTfl 5,8,5,0,5, 8 ,5,3,5,8,5 




, 3, 0,5, 10, 5, 0, 0,0, 3,0, 0,0, 0, 




,8,5,0,5,0,5,0,5,8,5,8,5,8,5 




3,0,8,5 




.0,5,5 


2570 


DRTR 5,0,0,0,0,0,5,0,0,0,0 


2830 


DRTfl 5,0,5,0,5,8,5,8,5,3,5 




,0,0,5,0,0,8,0,0,0,0,0,0,0,0 




,0,5, 0,5, 0,5, 0,5.. 8,5, 0,5, 8,5 




.0,0,5 




.0.8.5 


2580 


DRTR 5,0,0,0,0,0,5,0,0,0,0 


2840 


DflTR 5,0,5,0,5,0,5,0,5,8,5 




,5, 10, 18, 18, 18, 10, 18, 18, 18, 1 




,3,5,0,5,0,5,0,5,8,5,8,5,8,5 




0,5, 9,0, 0,8, 0,5 




.8.0,5 


2590 


DRTR 5 . 8, . 8, 8 • 8.. 5, 8 . 8 • 8 . 


2850 


DflTfl 5,0,5,0,5,8,5,8,0,0,0 




,5,0,8,0,0,0,0,0,0,8,5,0,8,8 




.8,8,0,0,8,0,8,0,8,8,0,0,8,8 




.0,0,5 




,3,0,5 


2608 


DRTR 5,8,3,0,0,8,3,0,0,5,8 


2860 


DflTR 10,18,18,10,10,10,18, 




,5,0,0,8,8,0,0,5,10,0,5, 10,5 




10,10,10,10,10,10,10,10,10,1 




.0,8,8,5 




0, 10, 10, 1.0, 10, 18, 10, 18, 10, 10 


2610 


DRTR 5,18,10,10,18,10,5,10 




. 10, 10 




, 18,5,0,0,0,0,0,0,5,10,5,8,0 


2370 


DflTfl 208 




,0,0. 5.0. R.fl.5 


2880 


DRTfl 18,10,10,10,10,10,10, 


2620 


DRTR 5,8,2,8,8,8,8,0,0,5,5 




10. 10, 18, 18, 10, 18, 18, 18, 10,1 




,8,0,0,0,0,5,0,8,0,0,0,0,5, 1 




0,18,10, 10,10,10,18,18,10, 10 




PI. 10,0,5 




, 10, 10 


2630 


DRTR 5,0,6, , , 3 ,8,0 , 8, 8, 1 


2898 


DflTfl 5,0,8,8,0,8,8,0,8,9,8 




0, 18, 10,0,0,0,5,0,0,0,0.3,0, 




.0.0.0,0,0.0.0,0,0,0,3,8,0,8 




0,0,5-0,5 




.0,0,5 


2640 


DRTR 5,0,0,0,0,6,0,0,0,0,8 


2980 


DRTR 5,8,10,10,10,8,10,10, 




, ,5,8 , , 5 , 0,8,0,0,0,0,0,8,0 




10, 10, 10, 10, 10, 10, 10, 10, 18, 1 




.8,0,5 




0, 10, 10, 10, 10,3, 10, 10, 18,8,5 


2659 


DRTR 5, 8 , , 8 , 3, Fi , 0, , R , , 9 








,0,5.. 10, 18,5,8,0,0,0,0,0,8,8 


2910 


DRTfl 5,0,10,10,0,0,8,0,8,8 




.0,0,0,5 




,0,0,0,0,8,8,8,8,8,8,8,0,0,0 


2660 


DRTR 5,8,0,0,0,8,8,0,0,0,0 




,10,18,8,5 




,0,0,0,8,5,0,0,8,3,8,0,8,3,0 


2928 


DflTfl 5,8,10,0,18,0,0*0,0,8 




,8,0,5 




.0.0.0.0.0.0,0.0,0,0,0,8,0, 1 


2678 


DflTfl 5,0,0,0,8,0,0,0,8,0,0 . 




0.0. 10.0,5 




.0,0,0,0,5,0,8,0,0,0,0,0,0,0 


2930 


DflTR 5,0,0,0,0,18,10,10,0, 




,0,8,5 




10, 18, 18, 10, 10, 18, 18, 10, 10, 1 


2680 


DRTR 5,0,0,0,8,8,0,0,0,0,0 




8,0,18,10,18,8,8,8,8,5 




, , 8 , 8 , 8, .i 8 , 8 , 8 , 8 , 8, 8 , 0, 0, 8 


2948 


DflTfl 5,8,18,8,8,8,8,0,8,0, 




,0,8,5 




0,0,0,0,0,8,0,0,8,8,0,0,0,0, 


2690 


DRTR 10,10,10,10,10,18,18, 




0.10,8,5 




10, 10, 18, 10, 10, 10, 10, 10, 18, 1 


2953 


DflTfl 5,0,10,0,8,18,8,8,0,8 




0, 10, 10, 18, 18, 10, 10, 10, 18, 18 




.2,2.3,0.0.0,0.0,0,0,8,8, 18 , 




,18,13 




0,0.10.0,5 


2700 


DflTR 280 


2960 


DRTfl 5,0,18,0,0,10,0,0,0,0 


2710 


DflTfl 10, 18, 10, 18, 18, 18, 18, 




.0.0,0,0,0,0,0,0,0,0,0,0, 10, 




18, 18, 10, 18, 10, 18, 10, 10, 18, 1 




8,0,10,0,5 




0, 18, 18, 10, 18, 10, 10, 18, 10, 10 


2970 


DflTfl 5,0,10,3,8,0,0,0,0 , 8, 




,10,18 




8.0,0,0,0,8,0,0,0,0,0,0,0, 8, 


2720 


DflTfl 5, 0,8, 8,8, 0,0, 8,8, 8,8 




3,18,8,5 




,8,8,8,0,0,8,8,8,8,8,0,8,0,0 


• 2988 


DflTfl 5,8,8,8,0,18,10,10,8, 




,8,8,5 




10, 10, 18, 10, 10, 18, 18, 18, 10, 1 


2720 


DflTR •5,0,18,8,10,0,18,0,10 




0.0. 10. 10. 10.0,0,0,0,5 




,0.18,0, 18,8, 10,0, 10,0, 18, 0,. 


2998 


DRTfl 5,0,10,0,10,0,0,8,0,8 




10,0,18,8,18,8,8,5 




,0,0,0,0,0,0,8,0,0,0,0,0,10, 


2740 


DRTR 5,0,5,8,0,8,5,0,5,0,5 




10,0,18,8,5 




■ 8 .. 5.. 8 , 5, 8, 5 , 8 ■ 5 .. , 5, 8, 5 , 8, 5 


3088 


DflTfl 0,8, 10,10,8,0,0,0,0,8 




,0.0,5 




.0,0,8,8,8,8,8,0,8,8,8,8,0,0 


2750 


DRTR 5,0,5,0,5,8,5,0,5,0,5 




,18,18,8,5 




.0. 5. 0,5, 0,5, 0,5, 3, 8,0, 5, 8,5 


3010 


DRTR 5,8,18,18,18,8,18,18 




.8,8,5 




,18,18,10,18,18,18,18,18,18, * 


2760 


DRTfl 5,0,5,3,5,8,5,0,5,8,5 




18, 18, 18, 18, 18,0, 18, 18, 10,8, 




,0,5,0,5,8,5,0,5,8,5,0,5,0,5 




5 




,0,0,5 


3820 


DRTR 5,8,0,8,0,0,8,0,3,8,0 


2770 


DflTfl 5,0,5,0,5,8,5,8,5,8,5 




,0,0,0,8,8,8,8,0,0,8,8,0,8,8 




.0.5.0,5,8.5,8,5.8.5.0.5.0.5 




.0.0.5 




.8.0.5 


3038 


DRTfl 18, 10, 10, 18, 18, 18, 18, 


2730 


DflTR 5,8,5,0,5,0,5,0,5,0,5 




10", 18, 18, 10, 10, 10, 18, 10, 16, 1 




,8,5,0,5,8,5,8,5,0,5,3,5,2,5 




8, 18, 18, 18, 18, 10, 10, 10, 10, 18 




,0,0,5 




,18,18 


2790 


DflTfl 5,8,5,0,5,0,5,0,5,0,5 
,0,5,3,5,8,5,0,5,0,5,0,5,0,5 


3040 


DflTfl -1 
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Spuhhaus 



„Gobus" dornenreicher Weg zur Schatzkammer 



Die Spielaufgabe besteht darin, an der 
Seite Ihres Freundes „Gobu" bis zur 
Schatzkammer vorzudringen, um dort 
das Gold und die Diamanten zu bergen. 
Das hört sich einfach an und wäre es 
sicherlich auch, wenn, ja wenn nicht 
die Spieße, die rollenden Kugeln und 
der Stampf wären, die unentwegt ver- 
suchen, Ihrem Freund eines seiner Le- 
ben auszulöschen. 

Da Sie eigentlich friedliebend sind und 
daher völlig unbewaffnet kamen, 
bleibt Ihnen nichts anderes übrig, als 
den Gefahren so gut es eben geht aus- 
zuweichen. 

Steuern können Sie Ihren Freund 
„Gobu" mit den Tasten -8- für vor- 
wärts, -0- für Sprung, während beide 
Tasten zusammengedrückt einen 
Sprung nach vorne bewirken. 
Achten Sie auf die Falltüren, die 
scheinbar die Grube verdecken! 
Weitere Merkmale sind die Highsco- 
re-Wertung, die Namenseingabe in 
guter alter SpielhÖllenmanier, der 
Wettlauf mit. der Zeit, der Ihnen nicht 
selten einen Strich durch die Rech- 
nung machen wird, und die Wahl zwi- 
schen drei unterschiedlichen Schwie- 
rigkeitsgraden. 

Für jedes Männchen, das die Schatz- 
höhle erreicht, bekommen Sie die der 
Spielstärke entsprechende Zeit gutge- 



schrieben, außerdem wird die Punkt- 
zahl mit einem je nach Spielstärke ver- 
schiedenen Faktor multipliziert, um 
einen Wettbewerb auch zwischen den 
unterschiedlichen Schwierigkeitsgra- 
den zu ermöglichen. 
In den Zeilen 80- 100 werden übri- 
gens die den Spielstärken zugeordne- 
ten Werte festgelegt. Diese Werte 
können verändert werden, um da- 
durch mehrere Spiel Variationen zu be- 
kommen. 



Eingabeanleit un g: 

Erzeugen Sie eine Remzeile der Länge 
842 Zeichen. Benutzen Sie dazu ent- 
weder den Remzeilen-Generator aus 
Heft 5/84 oder gehen Sie folgender- 
maßen vor: 

Eingabe der Remzeile 1 mit 100 Zei- 
chen. 

EDITieren Sie diese Zeile und erzeu- 
gen Sie auf diese Weise noch 7 weitere 
gleich lange Zeilen (Zeile 2-8). 
Geben Sie jetzt folgende Anweisungen 
direkt hintereinander ein: 



POKE 16511,76 
POKE 16512,3 
POKE 16510,0 
LIST 



NEWLINE 
NEWLINE 
NEWLINE 
NEWLINE 



Nach dieser Prozedur steht in der Zei- 
le eine Remzeile der Länge 842. 

Geben Sie Listing 1 ein, das der Einga- 
be der Maschinencode zahlen dient. 
Starten Sie das Programm mit RUN 
und geben Sie die Zahlen aus dem 
MC-Listing ein. 

Zur Kontrolle dieser Zahlen wurden 
die Listings 2 und 3 beigelegt. Listing 2 
dient der Berechnung der Prüfsum- 
men, Listing 3 schreibt die Speicherin- 
halte auf den Bildschirm- 
Haben Sie ein fehlerfreies Maschinen- 
programm im Speicher, dann löschen 
Sie die Programmzeilen der Listings 
1-3 einzeln und geben Sie das Basic 
Hauptlisting ein. Lediglich die Zeile 0, 
die jetzt etwas eigentümlich aussieht, 
erinnert noch an die vorausgegangene 
Arbeit. 



Sie können das Programm jederzeit 
■mit RUN 4500 SAVEn, danach führt 
es einen Autostart durch. Sollten Sie 
das Programm während eines Ablaufs 
unbeabsichtigt unterbrechen, starten 
Sie das Programm neu mit GOTO 60 
oder, wenn es Ihnen nichts ausmacht, 
daß der Highscore gelöscht -wird, mit 
RUN. 



18* F DR H « 16514 

2© INPUT fl 

3 CS POKE N..R 

SS? PRINT N.R 

S$ NS-XT N 
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(C) 19S4 
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MfiRTIN RIEOMILLER 
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15S2ö 
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ISS 35 
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16850 

15855 
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* LISTING 2 * 



|FOR HsslS514 TO 17313 STEP 



3a 
0© 

9110 L.5T 6=0 

912© FOR X=© Ti 

9X3® L.ET 5=5-fPi 

914© NEXT X 

215© PRINT N; " 

3180 NEXT H 

9170 LET S=s0 

9180 FGR N = 17314 TO 1734,-- 

9190 LET S=S+PEEK N 

920© NEXT N 

3210 PRINT "17314 - 



33 

:k cn+x* 



17347 



,5 



Computronic 



■«-Terlajr- 



1*1 



* PRUEFSUMHEN 



1551* 

16614 
16714. 
15814 
15914- 
17814 
1712.4. 
17214. 
17314 



15713 

15513 
15913 
17913 
17113 

17a 13 

17313 
1734-7 



5869 
7516 
5913 
7407 
5579 
©179 
9030 
8953 

ai63 



* LISTIMG 3 * 



9000ÜFOR N-16514 TO 17350 STEP 5 

301© PRINT N; 

902© POR X=§ TO 5 

9S30 LET SsPEEK «N+X3 

SS40 PRINT TßB 9+4. *X + CS < 10 3 + i S < 1 

00) ;S; 

9©50 NEXT X 
«050 -PRENT 
3©T0 NEXT N 



* SPUKHRUft * 

> 8RSIC-HRUPTLISTXNG 



ÜREH CG3 



1954 EY RIDX-SÜFT 
MARTIN RIE0HILLER 
SRTSCHKRER U£ß 13 
720S SPRICH INGEN 
T EL , 7 42 4 / 3350 



3 SLOÜ 

4 LET F-l 

5 LET H=0 
5 POKE 16416,,© 
9 LET N$ = "- " 

IS SXM E (5) 
20 LET B( 15 =15759 
30 LET B (£3 =159X4 
40 LET 5(35=16915 
50 LET B (43 =17014 
55 LET B (53 =17015 

53 CLS 

54 PRINT RT 8,85;'^ 
"jTfiB S5;" B ";TßB 25; " 



JTPB 25; 

~";TRB 2 



65 PRINT TAB 24] " 

SS^tpb' 24; a> "~ 

66 PRINT TRB 25; "|_ 
JTfiB 25: "B"; TRB 23; '1 

67 LET Pas<" 




";TRB 21; 
" :TRB 24; " 



' ; TRB 25; "j 




74 PRXNT RT B,S;"""SXE «ÜENSCH 



EN 

75 PRXNT RT 1© , ® f "P3 RDFIHRFT" , 
, "H> XTTELHRESSXG" f , "R3 NFRENGLICH 

76 PRINT tl "ZU SPIELEN 7 """*, } 

"' * 77 IF INKEY$ = "" THEN GOTO 77 

78 LET B*=XNKEY$ 

79 IF INKEY$=s"P s * THEN GOTO SS 

80 XF INKEY$="M" THEN GOTO 95 

51 PRXNT """flNrftEHÖLICH ?",*,* 
"-SEHR WOHL ^ SIR""'* 

52 LET ZEIT =1©0 

53 LET PAUSE =5 
84 LET Nsl5 

65 GOTO 1S0 

©9 LET F=7»5 

90 PRXNT * PROFI *?" t , , , " -MEIN 

E RNERKENNUNG,SIR""*' 

31 LET ZEIT =4ß 

92 LET PRUSE=4 

93 LET M=5 



95 

9& 



GOTO äS£'0 __ „ 
PRXNT """MITTEL 

:EL 5PRS8,SIR 

LET ZEIT =50 
LET PAUSE =S 
9S LET «sie 
99 LET Fi?2 e 5 
120 GOSUB 270© 
130 GOSUB 1000 
148 GOSUB 34330 



liJiS 



SO 



Ü & ■** <- s£ O 






L < > tf ? i 



-14-5 

150 GOSUB 2700 

160 GOSUB 1200 

17© GOSUB 3200 

17S- GOTO 176- C2S* CL < >©3 3 

150 GOSUB 2700 

190 GOSUB 1100 

20® GOSUS 30S0 

205 GOTO 206- (25* (L < >©3 3 

210 GOSUB 270© 

2S@ GOSUB 1©50 

325 POKE 15516,39 

330 GOSUB 3000 

235 GOTO 236- (26* (L< >83 3 

340 GOSUB 2700 

o^jä GOSL'5 1250 

2SS GOSUB 3200 

265 GOTO 266- (25* (LoB) 3 

2S0 GOSUB 1050 

S9S GOSUB 3000 

295 GOTO £96- (26* (L<>©3 > 

-300 Ö05UE • 2 * 00 

310 GOSUB 1150 

315 POKE 16516,39 

320 GOSUB 3000 

325 GOTO 326- (26* (L < >83 3 

330 GOSUB 2700 

34S GOSUB 1150 

350 GOSUB 3000 

355 GOTO 356- (25* (LOB) 3 

405 L££T PsINT (P*F3 

410 PRINT RT 31,8; "PUNKTE; "; X" 
3" RND P<10S03; <"0" RND P < 1003 ; C 
-0" RND P<10) ; P 

42© FOR N=l TO 20 

43© LET L=USR 17295 

440 NEXT 14 

460 LET M1=M 

470 FOR N = l TO H 

48© LET MlaMi-1 

43© PRINT RT 20,28;; ("0" RND Hl 
< 10 3 ; Ml 

S0© LET P=P+ZEXT 

510 PRINT RT 21,6; ("S" AND P<10 
3fc)£C"B" RND P<1003;C"0." RND P<1 

-520 NEXT N 

33© PRXNT . { ,"-TR5TE BITTE 

?4@ IF INKEYi a"" 

551 LET 




565 s LET. 2|=Z $ + " 
W % f' ' LET " Z"i= Z * + ' ' 

zf=Z$+" 

MÜH . 

569 LEf 2|s2S4." 

37©* LET *Z i =Z $ + " 

571 LET Z$=Z$+" 

572 LET Z^=Z$+" 

573 LET Z$-Z$*" 




X X 



fö<? 



gg 



/Omputronic 



59 




574- LET Z$=Z$ + * 1 

575 LET Zf = 2 £ + " 

S7S LET |$=I$4-" i( « ■" 

S77 L ET z'^s jZa»" 

S7S LET Z|»Z$ + i ' m 

S79 LET S Z * sbZ $ + *' fi 

SS L FT V* = ZsS + " 

3SK SB3<" 

ses cls 

SS© PRINT Z$ 

59S UET Z£-"" 

509 LET C|="§ SIE SXNÖ flff ZIEL 
XHR£R ÜUENSCHE RNSELfiNGT.DR MINT 
SN STEHT DXE DXRMRNTENKISTE . HERZ 
LICHEN GLUECKUUNSCH" 

-51« LET C*«C**". -TASTE SITTE 

S2© FOR M-l TG LEW C* 

S38 LET L*U5R 17314- 

84-0 PRIWT RT £-3 ( -3ÜC|4'K^ 

SS© XF 2NKEY$<>" ! ' THEN GOTO 70S 

573 HEXT H 

55© XF ÄMKEY$a"" THEN GOTO SS© 

713 XF P < -H THEN GOTO 9S© 

72© LET ti-P 

730 CLS 

74.© PR INT 




77© PRXNT RT S., ©;'** HERZLICHEN 

'3LUE CK WUNSCH *",,,"* 0R-S IST DEF: 

NEUE *•" 

73© FOR N = l TO 1© 

790 print rt ia,iii "saaass" 

80© PRINT PT iS,i0;"-REKORD-" 
©1© NEXT H 

s2© prxnt rt 21, s; "-taste bitte 

sss xf imkey&-"" then goto 825 

3^0 cls 

PRINT 




PRXNT ST S,Si"fl B C D E F" 

365 PRINT. TRB S; ,,SE " 

87© PRXNT TRB S;"G H X ü K L " 

SS© PRXNT , ,TRE S; "M N O P © R" 

8S3 PRXNT , ,TRS 6; "S T U U U X r ' 

90© PRXNT ,,TBS 6; "Y Z - - • " 

9@1 PRXNT ,r -"* STEU5PUMG " ' ,p5 ^ 
; MXT B; Sj 7; S" ^ "* EINÖRBE DURCH 

'3®a PRXNT RT 7,2©; "INITXR-LIEN : 

9©3 PRINT RT la^ii"««««" 

9©S LET Nftas"" 

31© LET X=S 

911 LET Z='o 

912 PRINT RT Z,X, " " 

313 LET XaX+S*({INKEV$»"e" AND 

C < 16 ) - C XNKEY $ « "5 " RNO X > S 1 .5 

914 LET ZssZ-s-2* ? {INKEY* = "6" RND 
K14) - CINKEY*«"7" RND Z>6)) 

9 15 PRXNT RT Z,X; "■■" 

916 XF IHKEY*s"S" THEN GOTO 9St- 

917 GOTO SIS 

920 LET BS= (Z.--2-3) *S+X,-'2-3 

921 XF BS>2S THEN GOTO 93© 

922 LET N£=N£-$-CHR$ (BS +33 J 

923 PRXNT RT 11.,23+LEN N$;N$(LE 

924 XF LEN N§=4 THEN GOTO 94-0 

925 GOTO 912 

930 LET ZE-® 



931 



Zc=z&+: 



: * (BS =26) 



'33S 
933 
934- 

935 

937 
o..< «* 



'36© 
970 



9-72 
975 

""990 

isae 

133© 
1©40 

3.073- 

a©s© 
nie 

xiae 

1130 
116© 
1170 

i ia@ 

121© 
12 IS 

aas® 

122© 

123© 
X23S 
1240 
1245 
123© 
127© 

las© 

12355 
2.30S 
1310 
132© 
133© 
13.3.® 
135© 
2710 
272© 
2730 
2740 
STB© 
27SS 

S7S8 
379© 

ss©€* 

231© 

2330 
£39© 

291© 

2923 

293© 

1:940 

295© 

'S? 

£960 

297© 

29 SO 

30 IS 

33 £@ 



LET ZEaZE+aat l'SS=273 
LET ZE=ZE+8*CBS=aS) 
LET ZE «ZE + 2 * * C S S =S« J 

LET N$=N|+CHR$ ZE 

GOTO 9S3 

PRXNT RT ai,ej"-TflSTE SXTTE 

T F X K 1K £V $ s= " ' ' THEN G OT O 9 S '3 

CLS 

PRINT ST 3,0;"* UÖLLEN SIE 

PRINT ., t , , "R> UFHOEREN" 
PRINT , l'NÜEU SPIELEN" 
XF XNKEY *="" THEN GOTO 975 
XF INKEV*a H ft" THEN GÖTO 4-30 

GOTO 68 

LET fl* = "0,S4.,9S,S4,85/' 

GOSUB 298© 

PETURN 

LET ft$»"3.?,24-, 9S ,24,, SS , " 

SOS US 29©© 

Rs: 5- URN 

LET R$ -"© , 17,, 33 , 24-., SS ^ " 

GOSUB 290© 



Li 



17 f 33,, 24 ,SE 



RETURN 

LET «$«"8,24,98^17 ^ 33 / " 

GOSUB 290© 

POKE 1SS44.^2SS 

POKE 1SS7 4-.SS 

POKE I7S63,7 

POKE 17ÖSi,6 

POKE ISS32.PEEK S17SS13-1 

RETURN 

LET a$ = !, i7,24, 93 , 17 , 33 ., " 

POKE 1SS44.,2©9 

POKE 1S81S,14- 

POKE 1SSI7,2 

GOSL?B S9S© 

POKE 3.7881,6 

POKE 16S32,PEEK S17©51i-1 

POKE 1SS74..31 

POKE 17SS©, 15 

RETURM 

POKE 1SEI4-,© 

POKE 1SS1S*© 

POKE ISSiSiB 

poke issai.ise 

POKE 16522 ,,2 

POKE 16583,0 

POKE ISB44.,77 

POKE 10316,138 

POKE 16317,1 

POKE 1 6535 , ZE IT 

POKE 16535 , © 

POK E 15793,4* PRU3 E 

POKE 1SS3© ', PRUSE 



LET L=© 

FOR H=! TO 5 

LET LI=L+1 

LET L=L+I 

XF R^CL><>" ," THEN GOTO 294- 

POKE B!N) .UAL CR^fLl TO L-l 



NEXT N 
RETURN 
CLS 

PRXNT 
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ir- 



Wfii 




31©© PRINT 

311 © "PR INT 
PI 

3 ISS PRINT 



Sias PRINT "PUNKTE: " : t"©" flMD P 

-cl©©0}; C"0* e RND P<10©>; C"S" RND 

P< IS) j P 

3127 PRINT , ., '** REKORD " .; t"©*' RK 

D H<10©©3; >:"©" RND H<1B0); f"©" R 

ND H<1@);H;" UON ";Nft 

3138 GOTO 34®© 

32 1© CLS 

BaS^., PRINT 

.V23i5 PRINT 

Ja4@ PRINT 

3250 PRINT 




* * * * 



3S6S PRINT 
****** 

327© print 
ä » $ $ $ jp" 

328©' PRINT ' RT 14-, S; 

339© PRINT ST 15, s 

330@ PRINT RT IS, 2 
3310 PRINT 



IllllllllSllSlg 
********** 
****** 

Ql. 

X" 




SIT : "j f*©" RND 
EXT^IOOS); {"B" BND ZEXT<180) j t"© 
" RND ZEIT < 1©) ; ZEIT, "MRENNCHEN : 

"J «"©" RND M<ie)jM 
3336 PRINT "PUNKTE: " ; r'©" RND P 
:!©©©); r'S' : RND P <!©©); ("©■" RND 

P < 13) j P 

333? PRINT , ,"# REKORD '■;("©" RN 

i* H<10©0>; C*'©" RND H<1©@); C"©" R 

ND H<10i;Mj" UON ,! JN$ 

343© PRINT RT 8,©;"* BEREIT 7 -T 

RSTE * " 

3*3© IF INKEY$o" e * THEN GOTO 34-£- 

© 

34.4.© P RINT RT 8,©; 



-34-5© GOTO 34.2© 

346© PRINT RT 3,©; " 

34-78 LET L»USR 1654.© 

34S0 XF L =64-000 THEN GOTO 33©© 
3431 PRINT RT 3,3; i " m&£8&S Mäskäi& ' ° 

RND L«65SS6) 
34SS PRINT RT & t @i ("* ICH FUERCH 
TS, SIE WERDEN DR UNTEN ÜERH 
UNGERN*.." RND L =85288) 
34-9© PRINT RT 8,©; i" * ICH UERHUT 
E. S SIE WÜRDEN RUFS KREUZ 

GELEGT, SIR» , . " RND (S_=S©S OR L- 
333 3 i 
34.95 PRINT RT 8,©; f" * UNGESPITZT 

IN DEN BODEN GESCHLRGEH 

TZZ..TZZ. . . " RND «L=5SSS© RND P£ 
EK 16514=©.) J 

3497 PRINT RT ö,ß; £"* TODESURSRC 
HE : SCHREDELBP 

SISBRUCH " RND L -103.4.) 

3 S?3 S?^ T ~97 ®'®* «"* D2 £ KRELTE 

UuN hOOF DEM 5TRMPF LRESST SIE 

ER5TRRREN,SIR «.«" RND {L=5S88ß 

RND PEEK I5514O0 5 ) 
35S5 IF La© THEN GOTO 33©© 
35 1© LET L « £ L < > SSB25 > 
3511 IF L<>© THEN GOTO 3535 
35 IS LET P=P+PEEK 15S35+aS5*PEEK 

15538 
3534- RETURN 



3525 PRINT RT 2.1,©;"* HEHEHE,.," 

353© LET M=M-1 

355© IF M=s© THEN GOTO 4-©©© 

355© RETURN 

351© LET Ss? 

352© IF PEEK 18516=11 OR PEEK IS 

516=10 OR PEEK 16515=13 OR PEEK 

Jl6516 = 1£ THEN LET S = 16 

363© IF PEEK 16516*13 OR PEEK 16 

5:16 = 17 OR PEEK 16616 «19 OR PBEIK 

5.6516aai OR PEEK 165 16 »S© THEN L 

ET 5=25 

-3®&® LET X=S+PEEK 16515 . 

355© PRXNT RT Z-2,S;" "jTRB Sj " 

";TRB Sj " " 

365© LET Z=Z-1 

367© PRINT RT Z , S; " +" ; TRB S-i;"C 

363© LET Z=Z + 1 

359© GOSUE 33©© 

3S9S IF Z=15 THEN GOTO 3850 

370© PRINT RT Z,S-1;'* + ",;TRB 6; 



371© LET Z»Z+1 

372© GOSUB 3888 

3735 IF Z«15 THEN GOTO 385© 

373© PRINT RT Z/S; " +"; TOB S-l; "X 



374© LET Z=24-l 

375© GOSUB 3SOS 

3755 IF ZslS THEN GOTO 3SS© 

37S© PRINT RT Z,S-1;" + "jTflß S; 

377© LET Z=Z*1 

373© GOSUB 380© 

37S5 XF Z = 15 THEN GOTO 3650 

379© GOTO 367© 

361© FOR N»l TO 2 

362© NEXT N 

394.© RETURN 

365© PRINT RT 15 , S-l; "XÜO" 

336© PRINT RT 8,©;"* TODESURSflCH 

S : BUFGE3PIE3S7. . , !i 

387© GOTO 351© 

391© PRINT RT 20,11; M 8" 

S3SO PRINT RT 8,0; "* Tüfl,ZEIT FÜ 

TSC-H-RLLES FUTSCH" 

3923 FOR N-l TO 20 

©.©3© LET L=USR 1729B 

3935 NEXT N 

394-© GOTO 3S1© 

4.0 1 © PR XHT RT 2© , 2© ; " © " 

4.® 3© LET C$b"# ICH DENKE /flflS «RR 

S D3EWM WOHL^OHJ'iE BBENTEUSER FOR& 

CHTS SICH SCHLECHT. . «HEHEHE. .-. " 

4.04.0 LET C$aC*+"Nfl DRNM,&IS ZUK 

NRSCHSTEN MRL C HOFFENTLICH BESSE 

*©5© LET MbC*+ n -TR-STE BITTE 



THEM GOTO S&© 
THEN GOTO 4-12© 



4-56© 
4-57© 

4-63© 



"SPUKHRUS 4 
1S3SÖ, 128 



4©S© FOR N=l TO LEN'CS 

A87S LET L=USR 17314- 

iSSe PR2NT RT S3,31;C*?N) 

4.©QiB IF IMKEV$0' 

4.11© NEXT N 

4-12© IF INKEY* = " 

4.130 GOTO 98® 

4-53S CLERR 

•4.54-%? PDKE ISO© 1 © / 63 

4-5o© CLS 

SRUE 

POKE 

CLS 

LET ft«S- = "©a* RIDI-SOFT PRRE3 
ENTIERT :■" 
4.S4-© GOSUB 5©0© 

4.54-5 PR INT BT 9 f © ; ******** * * ****** 
*******************" 

4-6^S LET fiS="Sis > SPL*'?; ff 

RUS< *" 

4.66© GOSUB 5©0© 

4.67© PR INT RT 13*0; '*********** ¥■ 
********************" 
4.74-© LET R$a"2i iC> 19- 

34 SV* RIDI-SOFT" 
4.74-5 GOSUB SS©© 
4.753 FOR Nai TO 3© 
4.76© XF IM^EVS-'; > '•*'•' THSH RL<M 

weiter Seite 67 
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1 430 I F < J I RN BS ) =8THENP0KE7747+L , 32 : L*L+22 = 0* 1 : GOSUB 1 300 
i 44@ I F ( T i RHD4 > -0THENPOKE7747+L , 32 : L*L-22 = 0-0 ■ GOSUB 1 580 
1456 IFOJiflND 1S)«0THENPOKE7747+L, 32 : L-L-l = 0«2 = GOSUB 1500 
1468 IF( J2flNB128>s0THENPOKE7747+L, 32 : L*L+1 : 0-2 : GOSUB1500 

1 46 1 I FPEEK < 7747+L ) ~5 THENM«M+ 1 : P0KE36S7S » 200 = FORT« 1 TO50 = HEXT • P0KE3S87S , 

1 462 I FPEEK i 7747+L ) =3ÖRFEEK < 7747+L ) «4THENGÖTÖ5880 

1463 IFfi>490THENI FPEEK ( 7747+L WTHENP0KE36875 j 128 : F0RT-1T058 : HEXT ; P0KE36875, • H- 
5:M=M+180 

1464 IFHs=5THEWIFPEEK<7747+L)*6THENM*M+150 : GÜTOS808 

i 4gg i fh- 1 THEN I FPEEK < 7747+L > »6THENP0KE36876 , 250 : FORT* 1 TO50 : NEXT • PÖKE36876 , 8 ' L«L- 



1 FM<498THEN I FPEEK < 7747+L ) «7THENGOTO5088 

PÖKE38467+L, 1 :P0KE7747+L,0 

RETURN 

PAKE36874.. 2Ö0 : FÖRT*iTö58 = HEXT • PÖKE36874, : RETURN 

FÖRT*1TÖ30 = P0KE36875, 20© = P0KE36S79, 9 ■ P0KE36879, 10 = PGKE36879, 12 : P0KE36875, 

P0KE3S879.. 12 

pri ur u :r ■ pok£36869, 240 
pr 1 nt " vmm stuemper 



1466 
1470 

1488 

13ÖÖ 

5080 
NEXT 

5010 

5020 

5030 

5048 pRINT^sT* 8 *" 1 " 1 

585S FRINT"MWfäl DU HAST ES NICHT" 

5068 PR1HT"39 GESCHAFFT.. DEN PHARAO" 

5878' PR 2 NT " ÄE I NZUF ANGEN . " 

5871 PRINTE IN EINER ZEIT VON 



i ^a j ^ Lai mtu mfc tütimiHfciBtio 



S"JTI*;" SEKUNDEN HAST MBU" ;M; "PUNKTE EREICHT 



GOTO7008 
FORT- 1 TOI 8 
POKE36877.-150 

P0KE7747+L.- 1 

FORW*1TO100:NEXTW 

P0KE7747+L..8 

P0KE36877, 8 : F0RW*iT0188 : NEXTW --NEXTT 

PRI NT "LI" : P0KE36869.. 240 : PÖKE36879, 12 

PR INT "?*#**# SUPER ! ***#'»; 

PRINT"ft 



5891 

£808 

6081 

6082 

6883 

6884 

S805 

6818 

€820- 

6038 

6040 PRI NT" »WWW DU KONNTEST DEN " 

6858 PRINT U MSI PHflRflO «BEZWINGEN.« 

6860 PRINT"M IN EINER ZEIT VON W'STI*;" SEKUNDEN HAST MDL 



SlÄUW|HBf|lWiTl«fl J ] 



j Mi "PUNKTE EREICHT 



7800 PRI NT ,ä MMsfdCHE I N'MRL 

78 1 8 GETA* : I Fft** u 3 " THENRUN 

7828 IFR*«"N"THENENB 

7838 GOTO7010 

10880 PRINT'TJ" 

PRINT"«» PHflRflO 
PRI NT"«! ""' 



<:nSäJ*:*VfSISNisJEiN) 



1 88 1 8 
18820 

10838 

10848 
18858 

18851 

18052 

18853 



PRI NT" »VERSUCHE MIT FRANK IE 
PR I NT " MDEN flUFERSTHNBENEN " 
PR I NT "'»PHRRfiO E I NZUFRNGEN " 
PRI NT «MUND IHN IN SEIHE " 
PRINT"ÄBRflB(<RriMER ZU BRINGEN, 
PRXNT H MIHN KANNST DU ERST 



18868 PR1NT U HBERUEHRE NICHT HIE 

1811 8 GETflf - I F fl$* " " THENGOTO 18118 

18128 GOTO 1800 

28888 REM PHARAO 

28810 REM BV MRIK JABLOHSKI 84/85 



»FANGEN WENN DU 50 

ÄBE ISTER OBER MAUERN. >' 



»RUBINE GESAMMELT HAST 
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^to^ 



Als Panzerkommandant müssen Sie 
versuchen, möglichst viele der feindli- 
chen Hubschrauber abzuschießen, die 
laufend über das Gelände im Tiefflug 
hinwegziehen. Aber Vorsicht! Ihr Ge- 
genspieler, der die gleiche Aufgabe 
hat und ebenfalls einen Panzer steuert, 
wird versuchen, Ihren Panzer abzu- 
schießen. In der Zeit, bis Ihnen von der 
Eisenbahn ein neuer Panzer geliefert 
wird, kann er dann nämlich ungehin- 
dert Ihre Hubschrauber abschießen. 

Davor können Sie sich schützen, in- 
dem Sie sich im Wald unter Bäumen 
verstecken. Eine perfekte Tarnung ist 
das aber nicht! Spätestens bei der 
nächsten Bewegung des Panzers ver- 
raten Sie Ihre Position. 

Beide Spieler bekommen je abgeschos- 
senen Feindhubschrauber 5 Punkte, 
für abgeschossene Panzer gibt's nur 2 
Punkte. Schüsse auf die eigenen Hub- 
schrauber {erkenntlich an der glei- 
chen Farbe) haben keinerlei Folgen. 
Die Panzer sind schwieriger zu treffen 
als die Hubschrauber. Der Nachschub 
an Panzern und Hubschraubern ist 
unbegrenzt. Beide Panzer können 



nicht gleichzeitig feuern, sondern im- 
mer nur abwechselnd. Während der 
Anlieferung eines neuen Panzers 
durch die Eisenbahn, welche sich mit 
einer Dampfpfeife ankündigt und auch 
verabschiedet, herrscht Waffenstill- 
stand, d. h., die Steuerung für beide 
Panzer ist unterbrochen. Nach der 
Lieferung werden beide Panzer in 
Ausgangsstellung gebracht und das 
Spiel geht weiter. Dies ist auch daran 
zu erkennen, daß sich die Rotorblätter 
der Hubschrauber wieder drehen. 

Wer als erster 100 Punkte erreicht, 
wird - begleitet von einem Fanfaren- 
stoß - zum Sieger erklärt. 

Das Hauptprogramm besteht lediglich 
aus der Joystickabfrage und der Bewe- 
gungssteuerung für die beiden Panzer 
einschließlich Berechnung des jeweils 
richtigen Panzer- Charakters für die 
vier Bewegungsrichtungen. Da nicht 
beide Panzer gleichzeitig kontrolliert 
werden können, sondern abwechselnd 
immer nur einer, mußte ich darauf 
achten, daß die Abarbeitungszeit des 
Hauptprogramms so kurz wie möglich 
bleibt. Daher ist die Anzahl der Re- 



chenvorgänge und der Variablen so- 
wie deren Länge möglichst klein ge- 
halten. Die Möglichkeit, Multiple-Sta- 
tement- Zeilen zu bilden, wurde weit- 
gehend ausgenutzt. 

Dies gilt größtenteils auch für die Sub- 
r outinen, z.B. für Erzeugung und Kon- 
trolle der Granate nach Betätigung der 
Feuertaste. 

Durch die relative Schnelligkeit des 
Hauptprogramms entsteht der Ein- 
druck, daß die beiden Panzer gleich- 
zeitig und unabhängig voneinander 
bewegt werden. Beide Panzer können 
jedoch nicht gleichzeitig schießen. So- 
bald eine Granate abgefeuert wurde, 
ist die Steuerung beider Panzer unter- 
brochen, bis ein Treffer erzielt ist oder 
die Granate den Bildschirmrand er- 
reicht hat. 

Hinweis zum Eintippen: Sollte die eine 
oder andere Zeile zu lang sein, um sie 
vollständig einzugeben, so ist sie nach 
vorläufiger Eingabe mit FCTN REDO 
zu wiederholen und danach zu ver- 
vollständigen. 



100 

110 

120 
130 

14B 
150 
160 
170 
180 
19Ö 

210 

1 00 

220 

230 

Fi".. 

240 
250 

?m 

278 

280 



* PANZERSCHLACHT * 

% . .„. % 

te i n 9.c t i onsP i 9 1 f uer * 



zwei Joysticks in 
TT Extended Basic 



<c> 1984 by 
! % michael oswald 

! *###*##mm***#**m 

CALL CLERR <« CALL 8CREENa2> 
CALL CHRR< 96.' "3F3F1EFE1E3F3F00" . 
, "FCFC787F7SFCFC00" > 
CALL TITEL<G*',B*) 
CALL CHflRC 1 92 * " O0280D34 1 65CZ400 ' 

111, "0000001818800000" ) 



CALL 
CALL 
CALL 
CALL 
CALL 
F8F8F8" > 
290 CALL 



300 
0" > 

320 
330 

0") 



CALL 

CALL 
CALL 
CALL 



CHfi'R* 115.. " 189050 103B383890' 
CHflR< 117, "0101010101010181' 
CHAR< 64, " 147C7EFFFE7FFE3C" j 
CHRRU18, "080F1D0F1C0C1E0C 
CHHR< 128, "7E247E247E247E24 1 

CHARC 136, "FFFFFFFFFFFFFFFF 1 
CHAR( 138, "C8F0F8FCFEFEFFFF' 

CHARC 105, M 0000000000183C18' 
CHRRX 107, "183C7F3E1C0C0808' 
CHFRC 141, H 0iFF031F3FlFi50F' 



97, "C6FEFEFEFED61010",99, " 1010D6FEFEFEFEC6", 

, 103, "8801488421248822" ,104, "900824599C3R480 
"1812141088383812" > 



,116. 
> 

72, "1 
,119, 
,120, 

,137, 
,139, 

,112, 
,108, 
,142, 



83CFE7FFFFE7C3C",80, "2418080808080000" > 

"0F1F0F0F0F0F1F0F") 

"0101010101010101 " , 65, "F8F8F8F8" , 73, "F8 

"01071F3F3F7F7F7F" > 
"FFFFFEFEFCFCE0C0", 140, "7F1F1F1F0F07010 

"000018383C181808 U ) 
."61F3F7722" , 109, "C48E24712" ) 

"E0F0F8FEFFFE54F8", 143, "080000004040404 
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340 CALL CHARC130',''387CFEFEFE929292%13I, n 6C7C285438 il > 

350 CALL CHARC 132. "387CFEFEFE9E929E" , 133, "6C380044380" > 

368 CALL COLORC 5, 7, 1,6, 13, 1 , 7, 2, i , 12, 2, 10, 13, 18, 16, 14, 6, 1 > 

370 8C4)=0 : ; BC8>~0 

380 ! #** 

390 ! **# AUFBAU GLEISANLAGEN 

408 CALL VCHARC 16,6,1 28 , 9 > ■■ * CALL VCHARC 1 6 , 27 , 1 28 , 9 > 

410 CALL HCHRRC 15,7,73, 1)' i CALL HCHRRC 15,6, 120, 1 )» ' CALL HCHRRC 1 5,28,65, i >■ = CA 

LI... HCHARC 15, 27,120,1) 



420 ! **# 

430 ! *** AUFBAU DES WALDES 

440 FORCN-13 TO 19 STEP 2 

EXT RN 

450 FÜR RM-2 TO 20 STEP 2 • 

460 CALL VCHARC9,CN,8Ö,1> 

470 FÜR RQ*11 TO 23 STEP 2 

480 CALL VCHARC 2 1 , CN, 80 , 1 ) ■ 

FXT CN 

490 FÜR CM« 14 TO 20 STEP 2 

500 FOR RP*3 TO 15 STEP 2 

Fi 10 FOR RÖ~4 TO 16 STEP 2 

520 CALL. VCHARC 17, CM, 80, 1> 

NEXT RR 

530 FOR RS=19 TO 23 STEP 2 

540 FOR RR«4 TO 20 STEP 4 



FOR RN~1 TO 7 STEP 2 ■ 

CALL VCHARC RN, CN, 72, 1 > > 

CALL VCHARC RO, CN, 64, 1 ) 
CALL VCHARC 22, CN, 72, 1 > • 

CALL VCHARC 1, CM, 72,1) 
CALL VCHARC RP , CM , 72 , 1 > 
CALL VCHARC RQ , CM , 64 , 1 ) 

FOR RR* 18 TO 24 STEP 2 



CALL VCHARC RN , CN , 64 , 1 ) = 

NEXT RM 

NEXT RO 
CALL VCHARC 24 , CN , 80 , 1 ') = 

CALL VCHARC 2, CM . 88,1) 
NEXT RP 
NEXT RQ 

CALL VCHARC RR , CM , 64 , 1 ) 



NEXT RS •■ = NEXT CM 
CALL VCHARC RA+ 1,12, 80 , 1 > ■ > 



CALL VCHARC RS, CM, 72, 1) 
CALL VCHARC RR, 12, 64, 1 ) ■ 
CALL VCHARC RA , 2 1 , 72 , 1 ) •• • CALL VCHARC RR+ 1 , 2 1 , 89 , 1 ) ■■ ■• NEXT RA 
550 ! tt'M 

^.60 ! *## AUFBAU DER TEICHE 

570 DATA 5,5,137,5,7,138,7,7,139,7,5,140,5,25,137,5,26,138 
5A0 DATA 6 , 26 , 1 39 , 6 , 25 , 1 40 , 7 ,27,1 37 , 7 , 28 , 1 38 , 8 .. 28 , 1 39 ,8,27,1 40 
R9H RESTORE 570 

600 FOR TEICH-1 TO 12 = = READ TR,TC,TP 
6 1. CALL HCHRRC TR , TC , TP ) •• • HEXT. TE I CH 
620 CALL HCHRRC 6 ,5,1 36 , 3 ) : : CALL VCHARC 5,6,1 36 , 3 ) 
630 ! **# 

649 ! #** AUFBAU GEBUESCH 

650 DATA 8,7,80,6,27,72,7,26,80,6,8,72,8,6,64 

6€>iÖ DATA 6 , 24 , 64 ,5,9 , 64 ,6,1 8 , 72 ■ 7 , 23 , 72 , 6,22 , 64 , 9 , 22 , 64 , 1 , 9 , 72 

6?B DATA 12, 23, 72, 13,11, 64, 3, 26, 64, 2, 23, 72, 4, 7, 64, 2,11, 72 

680 RESTORE 650 

690 FOR BUSCH* 1 TO 18 " READ BR,BC,BP 

700 CALL HCHRRC BR,BC, BP )= ■ NEXT BUSCH 

7 1 CALL SPR I TEC #20 , 64,13 , 49 , 49 , #2 1 , 64 ,7,4 1 , 20 1 ) 

720 ! **# 

730 \ *** AUFRUF PANZER UND HUBSCHRAUBER 

740 CALL SPR I TEC #4 , 99 , 7 , 96 , 208 , #8 , 93 , 1 3 , 96 , 40 ) - P* 1 -■ •• N- 1 

750 CALL SPR I TEC #1 , 1 15, 13, 1 , 1 , 10, 6, #2, 1 15,7, 1 , 256, 18, ~6 ) 

760 ! %%'$. 

??k i #*# HAUPTPROGRflMM 

780 K=4 i: CALL JÜYSTC 1,X, V ')■•■■ IF X+V«0 THEN 800 * •• IF X*Y THEN 780 

790 Ja 1 0*X+ Y i : P«C J=-4 )*~C J=4 )+2*C Js-40 )-2*< J«48 ) 

800 CALL PATTERNC #4, 98+P, #1 , 1 15, #2, 1 16 ) = •• CALL MOTIOHC #4, -V, X > 

810 CALL KEYC1,Q,S::<:: IF S THEN GOSUB 890 

«20 K~8 =■ CALL JÜYSTC 2, W,Z)^ IF W+Z=0 THEN 840 :> IF"W*Z THEN 820 

830 J~ 1 0#U+2 • : N*C Js-4 )~C Jk4 )+2*C Js-40 >~2*C J»40 ) 

R40 CALL PATTERNC #3 , 98+N , # 1 , 1 1 6 , #2 , 1 1 5 > = = CALL NOT I ONC #3 , -2 , W ) 

850 CALL KEYC2,Q,U)- IF U THEN GOSUB 920 

860 GOTO 780 

870 ! #** 

880 ! **# SUB PANZER FEUERT 

890 CALL POS I T I ONC «4 , R , C > < > CALL SOUNDC 1 00 , -6 , 2 ) 

900 fl»AB8< P > " IF fl-1 THEN CALL SPR I TEC #3,111,7 , R , C , - 1 26*P , >ELSE CALL SPR I TEC #3 

. 111,7, R,C,0,63*P> 
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910 CALL C0INC*#8,#3,12,T): •■ CALL C0INC*#3,#1, I6,S)^ IF S OR T TUEN 970 ■■ •■ CALL 
P08n'I0H*#3,M*l),M*2))- IF M*R)>68 BND M* AK 196 THEN 910 ELSE CALL DELSPR ITE*# 

3 > « < RETURN 

920 CALL POS I T I ON* #8 , R , C ) '■ • CALL 30UNDC 1 00 > -6 > 2 ) 

930 RsfiBS<H)i: IF fl«l THEN CALL SPRITE* #7, 111, 13,R, C,~12S:*:N, )ELSE CALL SPRITE* # 

7.. 11.1,13,R,C,8,63*N> 

948 CALL C0INC*#4,#7,12,T)- CALL C0INCX#7j#2j 16*3)' • IF 3 OR T THEN 370 - CALL 
POSITION* #7, M*i),M* 2)): = IF M*R)>60 AND M*flX196 THEN 948 ELSE CALL DELSPR I TE* # 

7 > ' • RETURN 

958 ! *## 

966 ! *#* SUB FEINDHUBSCHRRUBER GETROFFEN 

970 IF T THEN 1028 ELSE CALL DELSPRITE*#K-1 )- CALL MOTION* #K/4,8,0) ■• •• CALL SOUN 

D* -580 , -6 , 2 ) ■■■• CALL PATTERN* #K>'4 , 1 03 > 

980 CALL LÜCATE*#K/4..3,*K-2r-2:*7>: -• CALL PflTTERN* #K/4, 115)' ' CALL MOTION* #KV4, 18 

. * S-K )*3 ) 

990 B* l< )=B* K )+5 '■■ I F B* K ) >- 1 80 THEN 1 388 ELSE DI SPLHY BT* 1 , * 32--'K ) A 2/2~7 )8 I ZE< 3 ) 

= B*K> = RETURN 

1808 ! **# 

1818 ! #** SUB FEINDPANZER GETROFFEN 

1. 828 CALL DELSPR I TE* #K- 1 ) = = CALL MOT I ON* #32.-'K , 9 , , #K , , 8 > 

1830 CALL. SOUND* 3008, -6, 8> 

1840 FOR L«i TO 5 " CALL PflTTERN* #32-4*, 182 ) = •• CALL C0L0R*#32/K, 16 >'• ■■ FÜR Ll~l T 

38 •■■■ NEXT LI " CALL PATTERN* #32/K, 183 ')■■■■ CALL C0L0R*#32/K,2 >•■ •■ FOR L2=i TO 3 

> <■ NEXT L2 < i NEXT L 

1050 FÜR PS=1 TO 100 - NEXT PS -. CALL RATTERN* #32/K, 184 ) = • FOR J~8 TO 28 STEP 

2 = = CALL SOUND* --50 , 1 i , J , 1 1 7 , J , 1 39 , J , -6 , J ) » = HEXT J 

1 068 CALL POS I T I ON* #32/K , RON , COL > ■ ■ CALL SPR I TE* #5 , 1 85 , 1 6 , ROW- 1 8 , COL '>■■■ FOR L3* 1 
TO 188 : = NEXT L3 

1878 CALL PATTERN* #5, 112)- FOR L4~l TO 188 •■ ■ NEXT L4 ■■ CALL PATTERN* #5, 187) 

1888 FOR L5-1 TO 188 ! > NEXT L5 == CALL PRTTERH*#5, 108)= > FOR L6*l TO 188 ■■ ■■ NEX 

T LS 

1898 CALL PATTERN* #5, 109 >« . FOR L7-1 TO 280 ■■ ■■ NEXT L7 ■•' CALL DELSPRITE*#5) 

1108 B* fO=*ß* f* >+2 ■■ IF B*K >>=1 88 THEN 1388 ELSE DISPLAY AT* 1,*32--'K )-"-2--'2~7 )8 1 ZE* 3 

> = B* K ) 

1118 ! %%% 

11.28 ! *** PAUSE BIS LIEFERUNG NEUEN FEIHDPANZERS 

1130 D»0 " IF K-8 THEN P-N 

1140 CALL J0YST*K/4,X,Y)' < IF X+Y*0 THEN 1160 ' '■ IF X*Y THEN 1148 

1 1 58 J= 1 0#X+V : = P»< J«-4 )-* J»4 )+2#* Jw-48 )~2** J~48 ) 

1168 CALL PATTERH*#K,98+P,#1,115,#2, 116): = CALL MOTION* #K,-Y,X>" D«D+1 " IF D> 

«58 THEN GOTO 1260 

1170 CALL KEY*K>4,Q,S>= : IF S THEN 1188 ELSE CALL PATTERN* #1 , 116, #2, 115 ">•■•• GOTO 

1148 

1180 CALL PGSITIÜN*#K,R,C): : CALL SOUND* 100,-6,2) 

1190 R-flBS<P)== IF fi-1 THEN CALL SPRITE* #3, 1 11 , 7,R,C,~126*P,0)ELSE CALL 3PRITE*# 

3.111,7,R,C,8,S3:*:P) 

1 208 CALL CO I NC* #3 , #K>' 4 , 1 6 , S ) ■■ '• I F S THEN 1210 •• * CALL POS I T I ON* #3 , M* 1 ) , M* 2 ) ) - 

TF M*A)>68 AND M* AH 196 THEN 1208 ELSE CALL DELSPR ITE* #3)" GOTO 1148 

121.0 CALL DELSPR ITE* #3)= ■• CALL MOTION* #K/4,8,8)= . CALL SOUND* -580, -6,2)^ CALL P 

ATTERN*#K/4,103> 

1228 CALL LOCHTE* #KV4, 3, *K-2>-"2*7>= * CALL PATTERN* #K/4, 115) ■- ■■ CALL MOTION* #K/4, 1 

8 < * S-K )*3 > 

1238 B*K>=B*K)+5 = ■• IF e*K)>«188 THEN 1388 ELSE DISPLAY AT* 1,*32/I<r2--'2~7)SIZE*3 

)'B<K>: = GOTO 1140 

1240 ! *:*:* 

1258 ! *#* SUB LIEFERUNG NEUER PANZER 

1260 CALL MOTION* #K, 8,8) 

1 ??B CALL SOUND* 1 80 , -S , 6 ) ' = CALL SOUND* - 1 200 , 2888 , 4 , 4888 , 4 , 6880 ,4,-6,4)- CALL S 

0UND*58,-6, 18) 

1280 IF KM THEN CO- 13 ELSE C0~7 

1290 IF K=4 THEN SE=40 ELSE SE-288 

1308 CALL SPRITE*#32/-K,99,CO,240,SE,#10,n8,2,216,8E,#ll,119,CO,208,SE) 
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1.316 FÜR F=216 TU 128 STEP -1 = •■ CALL LOCflTE< #18,F,8E,#1 1,F~8,8E): : CALL SOUHDC-- 

1 8 , 2208 , 28 .. 228 .. 1 4 , 1 1 .. 1 2 , -S , 3 "> ' ■ NEXT' F 

1320 FÜR PAUSE* 1 TG 200 ; = HEXT PAUSE 

1330 CALL SÖUHD< 108, -6,6)- CALL SOUND* -1200, 2980 ..4.. 4000, 4-6000,4, -6.-4 )- CALL S 

OUHD<50,~6,10> 

1340 FÜR TIME-i TO 588 = '■ HEXT TIME 

1358 FÜR G*120 TO 96 STEP -1 :: CALL L0CATE<#3£^K^G#SE) ! : HEXT G 

1 360 FOR H" 1 28 TO 2 1 6 - . CALL LOCRTEt # 1 8 , H , SE ,#11, H»8 , SE ) • • CALL SOUND-:: - 1 , 2200 , 

20,220, 14,110, 12,-6,3 V : HEXT H 

1370 GOTO 740 

1380 CALL SCHLUSS<G$,BS,K) 

1 390 D I SPLAV ATX 23,4):" NOCH E I NMAL ? <. j /n ) " ■ • CALL KEY* 8 , K , S > 

1408 IF NOT S THEW 1398 ■■ ■■ XF K=106 TUEN CALL CLEAR • = GOTO 268 ELSE END 

1418 ! **# 

1428 ! *** TITELBILD UND SPIELREGELN 

1438 SUB TITELX G*,B*) 

1448 CALL CHARa.36,"FFFFFFf~FFFFFFFFF" >= = CALL COLOR< 14,6, 1 ) 

1 458 CALL MAGN I F Y< 2 > •• '■ CALL SPP I TE< #20 , 1 08 , 1 3 , 96 , 24 ,#21 , 96 , ? , 96 , 224 > 

1 468 CALL HCHRRC 5,18 , 1 36 ,14)- CALL HCHAR< 7,18,1 36 ,14) 

1 478 D I SPLAV AK 6 , 8 ) = " PANZERSCHLACHT " 

1 480 D I SPLAV RTC 1 3 , 6 ) ■ " e i n s.P i e 1. f Uer zw* i " 

1498 DISPLAY AK 23,1)=" «X> BY MICHAEL OSWALD 1984" 

1580 FOR t_~l TO 98 = ■' CALL S0UHDOS8 , 1 400-< L*6 ) , L/9 ) • > HEXT L •■ CALL S0UND< 1560 

,-6,0 >■■■■ FOR L«0 TO 38 ■■ ■■ CALL SOUND< 10, 1 18,L,~7,L)= ' NEXT L 

1510 FOR ZEIT-1 TO 588 • ■ HEXT ZEIT •■ DISPLAY ATX 19,6 >BEEP- "LEERTASTE DRUECKEN! 
ii 

1528 CALL KEY(8,K,S)^ IF 3*0 THEN 1520 ELSE GOTO 1530 
1530 CALL DELSPRITE(:#28,#21)= • CALL MAGNIFY(1)== CALL CLEAR 
1548 DISPLAY ATX 13,1)= "SPIELREGELN NOETIG ? <J/H)" 

1558 CALL KEY(8,K,S)== IF S"8 THEN 1558 = : CALL CLEAR =' IF K*78 THEN 1630 
1568 PRIHT :»DIE SPIELER STEUERN JE EINENPANZER MITTELS JOYSTICKS." 
1578 PRINT '"ES KOENNEN DIE FEINDLICHEN HUBSCHRAUBER ABGESCHOSSEN WERDEN* 5 PU 
HKTE), ABER AUCH DER -JEWEILIGE FEIHDPRNZER* 2 PUNKTE)," 
1580 PRINT = "DIE BEIDEN PANZER KOENNEN NICHT GLEICHZEITIG FEUERN." 
1598 PRINT '"NACH ABSCHUSS EINES PANZERS KANN DER ANDERE NOCH KURZE ZEIT WEITER 
FEUERN, BIS DEM GEGNER EIN NEUER PANZER GE- LIEFERT WIRD." 
1680 PRINT '"WER ALS ERSTER 100 PUNKTE HAT, IST SIEGER," 
1610 PRINT :" >LEERTRSTE< FUER WEITER" 
1628 CALL KEV<8,K,S)=- IF 8-8 THEN 1620 ELSE CALL CLEAR 

1630 DISPLAY RTC 1,1): "HAMEN DER OBERBEFEHLSHABER ANGEBEN !" '■ ■• DISPLAY AT(8,1> = 
"FUER GRUEN ■•"••■• DISPLAY ATX 18, 1 )« "GENERAL" 

1648 DISPLAY AT( 14,1): "FUER BRAUN •■ " : : DISPLAY ATX1 6, 1 '>■ "GENERAL" 
1 658 flCCEPT AT< 18,9 )VHL I DATE< UALPHA , NUMER I C >BEEP S I ZE( 24 ) ■• G* 
1 6m flCCEPT AK 1 6 , 9 )VRL I DATE< UALPHR , NUMER I C )BEEP S I ZE< 24 ) • BB 
1670 DISPLAY ATX 28, 5)' "ALPHA LOCK LOESEN !" 

1688 DISPLAY RTX23,1)'" >LEERTRSTE< FUER START" == CALL KEVC8,K,S)=: IF S=0 THE 
N 1680 ELSE CALL CLEAR 
1690 SUBEND 
1788 ! *** 

1718 ! *** SPIELENDE 
1720 SUB SCHLUSS<G*,B*,K) 

1.730 CALL DEL8PRITE<ALL)> « CALL CLEAR •■ ■■ CALL CHRRSET 
1748 CALL SOUHDa08,480,8, 1200,0,2480,0): : FOR L»0 TO 38 
1 750 CALL SOUND* -50 , 400 , L , 1 288 , L , 2488 , L ) ■■ '■ NEXT L 
1768 IF K~4 THEN SIEG**BS ELSE SIEGS=G$ 
1778 DISPLAY ATX2,1): "GENERAL % SIEGS 
1788 DISPLAY ATX 4, 1 )* " IST DER SIEGER !" 
1798 FOR TON«! TO 12 = « READ D,F 
1 888 CALL SOUND«:: D , F-3 , , F , 8 , F+3 , > ■ ■ HEXT TON 

1818 DATA 388 , 258 , 588 , 328 , 58 , 320 , 50 , 328 , 58 , 328 , 288 , 400 , 200 , 328 , 288 , 408 , 208 , 488 , 2 
08 . 488 , 288 , 488 , 588 , 658 
1828 RESTORE 1810 



Computronic 



W]£*4S 



^Ments 



1830 IF K>4 THEH C0L*7 ELSE COL-13 

1840 CALL MflGNIFY<2) 

1. 850 CALL SPR I TE< #12,141, COL , 1 8*8 , £3*8 , # 1 3 , 1 42 , COL , 1 8*8 , 24*8+8 > 

i960 FÜR 1-1 TO 500 ■• HEXT I *« CHLL SOUNDC 180,-4,0, 110, Ü5, 220, 5, 3088, 3 > 

1870 CHLL 8PRITE<#14, 143, COL, 16*8, 25*8+4 >= = FOR I*i TO 100 : ' HEXT I 

1880 CALL SPRITE< #5, 105, 16, 16*8, 24*8+4, -3, 0): ■• FOR L3«l TU 18Ö •• •■ HEXT L3 

1890 CALL PATTERhK#5,H2>: = FOR L4-1 TO 100 '■ ■ HEXT L4 " CALL PflTTERM #5, 107 > 

1900 FOR L5*l TO 100 ■■ •• HEXT LS * = CALL PRTTERH<#5, 108)' • FOR L6^=l TO 100 •■ ■• HEX 

T 1.6 

1.318 FOR L5=l TO 100 •• •• HEXT L5 " CALL PRTTERN<#5, 103)= = FOR L6«l TO 180 ■ •■ HEX 

T L.6 

1920 CALL MO'nOH<#5,0,0>< •> CALL POS ITI ON< #5 , DOR , DOC ) '■ •■ 

1930 CALL 8PRITE<:#5,131,16,rXiR,DOC,#6,130,16,DOR--16,DOC)= • FOR Tl = l TO 200 " NE 

XT Ti 

1940 CALL PflTTERN<#5, 133)" FOR T2«l TO 90 !! NEXT T2 = 

FOR 1*1 TO 59 ■■■■ NEXT 1 •• •■ CALL PATTERH<#6, 130 ) 

1950 FOR T3=l TO 90 •■ HEXT T3 •■ CALL PATTERHC #6, 132)= 

'■• CALL PATTERH<#6,130) 
i960 FOR T4=l TO 90 :.■ HEXT T4 ■■ ■ CALL PATTERH''#5, 131 )* 

T5 
19?P\ CALL DEL3PRITE<#5,#6)= •• FOR 1-1 TO 300 =■ NEXT I 
1. 980 CALL SOUNDS 1 00 , -4 ,0,118,9 , 229 , 9 , 3008 , 3 ) •• CALL DELSPR I TEC # 1 4 ) 
1990 FOR REST-i TO 750 '■ < NEXT REST 
2000 CALL DELSPR I TEC ALL)' • CALL MRGHIFVX 1 ) 
2010 SUBEHD 



CALL RATTERN':: #6, 132)= = 
FOR I«l TO 50 : : HEXT I 
FOR T5~l TO 200 = « NEXT 
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4-?7® HEXT *'i 


****#*■**##«##****#**" 


-473» RUN 


4S7© GOTO 9S99 


43SS Ct. 3 


5838 LET 2=UfiL R$(l TO 3) 


4-B3B PRZNT RT S ,©;" *#*#*#**#**#* 


SS35 PRINT RT Z.,@; 'W i 


***3**»»a&*a****-ä-4fr * ■" 


ö®4-0 FOR N=3 TO LEN R$-l 


4~a^& L£T fi$ = "ii* BIS ZLSM NfiECHST 


3353 PRINT RT Z , N-3; R$ iU ) ; "g" 


EN MAL, CISC **' 


s@S0 NEXT N 


41S50 GOSLfS S0Ö0 


3079 RRXNT RT ZjN-3;fl*CN) 


4-8SQ PRINT RT 13,0; "*********#** 


5S&S© RETURN 



WERSIBMRD NUSIC 

für Commodore C 64 /SX 64 



Wersiboard Music 64, ein Keyboard mit 
Interface und kompletter Software 
(Diskette und Handbuch) für kreative 
Musik und aktives Musizieren. 
Sie spielen auf einer echten Klavier- 
struktur fast alle Instrumente eines 
größeren Orchesters. Durch die zahl- 
reichen 'Gestaltungsmöglichkeiten 
können beliebig viele Klangfarben er- 
zeugt werden, bis hin zu den eindruck- 
vollsten Synthesizer-Stimmen. 
Mit dem neuen Soft wäre- Angebot las- 
sen sich über das Wersiboard 64 bis zu 
640 selbstentwickelte Klangfarben in 
zwei unterschiedlichen Bereichen 
speichern und über ein Inhaltsver- 
zeichnis jederzeit abrufen. Damit ge- 
hört der Commodore 64 mit zu den 
universellsten Home- Computern in 
Verbindung mit Musikspeichern. 
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„Kerzenheinz" 

Irrweg durch ein Labyrinth voller Geiahren 



Getestet von der Redaktion wurde 
dieses Spiel auf dem Atari 800! 
Hinweis: Auf den anderen Atari- 
Computern muß dieses Programm 
getestet werden. 

Heinz kämpft sich durch ein riesiges 
Labyrinth und wird dabei von einer 
todbringenden Kugel verfolgt. Seine 
Aufgabe ist es, sämtlichen Kerzen, die 
sich in den einzelnen Gängen befin- 
den, das Lebenslicht auszublasen. 
Nachdem er Runde 1 schadlos über- 
standen hat, erhöht sich in den folgen- 
den Durchgängen (Level 1 bis* 4) der 




Schwierigkeitsgrad. Die Gänge wer- 
den immer verwinkelter, die Anzahl 
der Kerzen steigt und vor allem, je 
mehr Kerzen Heinz auslöscht um so 
dunkler wird das Licht auf dem 
Screen. 

Wenn „Kerzenheinz" kurz vor dem 
Ziel steht und nur noch eine Kerze zu 
löschen hat, ist das Bild schon so weit 
abgedunkelt, daß nur noch die letzte 
Kerze und die rotierende, bedrohliche 
Kugel zu erkennen ist. Heinz tastet 
sich praktisch blind, dauernd gegen 
irgendwelche Mauern stoßend, zur 
letzten Kerze vor. 



1 GRRPHICS 17 = POSITION 1,18 = ? #6 .; " MOMENTCHEN NOCH. - . " <F0R T=0 TO 500'NEXT T'GRflP 
HICS 17 

2 P<PEEK<106)-e>*256-DIM fi$<20>,R<3>,N$<20):RU=0 

3 FOR T=0 TO 5I2«PE*PEEK<57344+T>>P0KE P+T,PE=PÖKE P+T+512,PE=NEXT T 

4 FOR T=P TO P+7i'REflD FhPOKE T,R=P0KE 512+T,fi=NEXT T*PGKE 756, P/256 

5 ORTfi 0,0,0,0.0,0,0,0,60,126,90,255,255,90,102,60,120,252,244,190,191,236,240,1 
20 

6 DfiTfl 60,126,126,255,255,126,126,60,30,63,47,125,253,55,15,38,0,251,251,8,0,223 
.223,0 

7 DftTfi 24,60,126,126,126,126,60,24,24,56,16,124,124,124,124,124,60,126,90,255,25 
5,102,60,126 

8 FOR T=P+512+56 TO P+512+63=RERD B'POKE T,B<NEXT T=DRTR 48,56,16,124,124,124,12 
4,124 

9 GOSUB 100 

1.0 RESTORE 200+INTCRU 5*23 'PU»i0= FOR T*8 TO 3=RERD B = fl< T >=B < SETCOL0R T,R< T),PU'NE 

'x'T T 

1.1 FOR T~l TO 23 > READ fi$=G08UB 999 = POSITION 8,T = ? #6;R*'NEXT T'COSUB 700= COLOR 1 
29'PLOT 9, 12= FOR T«l TO 6 

1. 2 X2=* l NT< RND< >* 1 9 > » Y2- 1 NTC RNDC >*22 >+ 1 = LOCHTE X2 , Y2 , R2 ' I F R2«32 THEN DOLOR 7 ■ P 
LOT X2,Y2=NEXT T 

13 IF R2<>32 THEN 12 

14 R=0 : x«9 i Y*12 • BI=-1 = 62«- 1 i Xi«0 ■ Y1=0 '• Rl*32 •■ XR1=0 • YR1«0 

15 C0L0R 32=PL0T 9,12 

20 SbSTICK<0)'IF SO 15 THEN COLOR 32'PLOT X,Y'GÖ8UB 50'GO8UB 51 

22 COLOR 129+R-INT<R/4>*4=PL0T X,Y 

23 IF STRIG<0>-0 THEN GOTO 23 

24 COLOR fl'l :PL0T XI, Yl «X1"X1+B1*XR1 « Y1-Y1+B2*YR1 'Xl«Xi-<Xl>18>+CXK0)< Yl*Yl-< Yl> 
22H<Y1<1> 

25 LOCHTE XI ,Y1,R1 « COLOR 166 = PL0T X1,Y1 = IF Rl = 129 OR fll = 130 "OR Rl-131 OR fil*132 
THEN GOSUB 60 

26 IF X1=0 OR Xl*18 THEN XR1 = INT(RND<0>*2)+1 = B1=H31 

27 IF Yl=*l OR Yl*22 THEN YR 1 = I N7X RND< )$2 >+l =B2*-B2 

28 P0K>P/256+2*< POK^P/256 > » POKE 756, POK 

29 SOUND 0,Y1*10,8,10 

30 POSITION 1,0 = ? #6; "LEVEL " ;RU*2+1; '" POINTS ";PUN 



Computronic 




44 GOTO 20 

50 X-X+C S=7 >-< S* 11 > < Y* Y+< S» 1 3 >-C S« 1 4 ) ■ R«B+< S*7 >-< 8« 11 HC 8» 1 3 )-< 8* 1 4 > « RETURN 

51 LOCHTE X..Y..flR'IF AR*32 THEN RETURN 

52 1F AR=1 66 THEN GOSUB 68 

53 IF HR-37 THEN 8«7*<3»11 Hll*< 8«? H14*< 8=13 H13*<8«14>' GOSUB 50 'RETURN 

54 IF AR«7 THEN GOSUB 88 ' PU-PU-2 ' FOR T*0 TO 2'8ETCOLÖR T, A<T>, AB3<PU>'NEXT T'PUN 
■PUN+1'IF PU<0 THEN GOTO 70 

55 RETURN 

60 FOR T«0 TO 100^ SOUND .. 1 00+T > 1 , T/ 1 0+2 ' NEXT T ' SOUND , , 9 , 

62 SETCÖLOR 3,8,13'FOR 7=0 TO 2'SETCOLQR T,A<T>, 10 'COLOR 136'PLOT X^Y* POSITION 
,23'? #6; "START FUER NEUBEGINN"; 

63 IF PEEK< 53279 >=6 THEN GRRPHICS 17'POKE 756, P/256 'GOTO 9 

64 pi>@ i PIJN=0 ' GOTO 63 

70 RUaRU+B. 5 »POSITION 2,0'? #6 j "MOMENTCHEN NOCH" 'GOSUB 710 'POSITION 0,0 

71 ? #6j" "; 'GOTO 10 

m COLOR 1 29+< 8-7 H2#X 8= 1 4 H3*< 8= 11 ) ■ PLOT X< 8=7 )+< 8= 11 ) , Y-< S« 1 3 HC 8= 1 4 > « FOR T«8 

TO 100 N SOUND 2,80,8, 15 'HEXT T 
81 SOUND 2, 0,8,0 'COLOR 0'PLOT X,Y'PLOT X-< 8=7 HC 8= 1 1 >,Y-C 8=13 HC 8*14 >< RETURN 

100 N*«" GNOM-PRODUCT IONS "'SETCOLOR 2,0,0 

101 COLOR 133 = PLOT 0,5'DRRWTO 19,5'FOR T«=l TO 17'C0L0R 1+T-INTC T/4 >*4« PLOT T+1,4 
'POSITION 0,4'? #6.iN$<18~T> 

102 FOR 1*0 TO 15 'SOUND 9,50, 10, 15-1 'NEXT I'NEXT T' COLOR 0'PLOT 18,4 

103 N»*" PRHESENTIERT" 

104 COLOR 133« PLOT 8,8'DRRWTO 19,8'FGR T=l TO 16'COLOR 1+CT+l HINTCCT+1 V4>*4'PL 
OT T, 7 'POSITION 0,7'? #6*N*<I7-T) 

105 FOR 1=0 TO 15' SOUND 0, 100, 18, 15-1 'NEXT I'NEXT T'COLÖR 0'PLOT 16,7 

106 PO~PEEK<560HPEEK<561>*256'POKE PG+19,7 

107 N$*" KERZENHEINZ" 

108 FOR T*l TO 15 'COLOR l+<T+2HINT<<T+2)/4>*4'PL0T T, 14'POSITIÜN 0,14'? #6;N*<1 
6-T)'IF T>12 THEN GOSUB 116 

109 FOR 1=0 TO 30 «SOUND 8, 158, 10.15-1/2 'NEXT I'NEXT T 

110 COLOR 2 «PLOT 15,14'POKE P0+24,2'P0KE PO+25, 2 'POSITION 10,19'? #6; "START FUER 
BEGINNEN" 

111 POSITION 8,21=? #6j"SELECT FUER ERKLAERUNG" 

112 IF PEEKX 53279 >«6 THEN GRAPHICS 17'POKE 756, P/256 'RETURN 

113 IF PEEKX 53279 )=5 THEN GOSUB 130 'GRRPHICS 17'POKE 756, P/256 'RETURN 

114 GOTO 112 

1 16 COLOR 1+T-IN7X T/4 >*4 ' PLOT T-12, 14 'RETURN 

130 GRRPHICS 0'POK.E 756, P/256 'POKE 752,1 

131 ? '? " $ DER KERZENHEINS «"■? '? " DU BIST DER KERZENHEINZ ! #* UND " 

132 ? " DEIN ZIEL IST E8..RLLE KERZEN IN DEN RflEUMEN AUSZUBLASEN. ABER DIE BOESE 

ii 

133 ? " KUGEL VERSUCHT DICH ZU BEHINDERN SOBALD SIE DICH BERUEHRT, VERURNDEL 
ST DU DICH IN EINE MARMORSTATUE" 

134 ? '? " VIEL GLUECK UND SPASS" '? '? " START FUER BEGINNEN" 

135 IF PEEKX 53279 >«6 THEN RETURN 

136 GOTO 135 

200 DATA &,3AAZ,XXXXXXXXXXXXXXXXXXX 

201 DRTR X X 

202 DATA X X X X X X X X X X 

203 DRTR X X 

204 DATA X X X X X X X X X X 

205 DATA X X 

206 DRTR X X X X X X X X X X 

207 DRTR X X 
2.08 DRTR X X X X X X X X X X 

209 DRTR X X 

210 DRTR X X X X XXX X X X X 

211 DRTR X X X 

212 DRTR X X X X XXX -X X X X 

213 DRTR X X 
21.4 DATA X X X X X X X X X X 
2t 5 DRTR X X 
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21*5 


DATA 


x x x x x x x x x x 




217 


DATA 


x x, 




218 


DATA 


X X X X X X X X X X 




219 


DATA 


X x 




229 


DATA 


X X X X X X X X X X 




221 


DATA 


X X 




222 


DATA 


xxxxxxxxxxxxxxxxxxx 




223 


DATA 


0, 7.. 12. 5.- X'4X4XXXXXXX 


XXXXXXXX 


224 


DATA 


X XX X 




225 


DATA 






226 


DATA 


X X X X X X X 




227 


DATA 


XX X X X X X X 




228 


DATA 


X XX X X XX X 




229 


DATA 


XX X X X XX 




230 


DATA 


XX X X XX 




231 


DATA 


XXXXXX X xxxzxx 




232 


DATA 


X % XXX X X 




233 


DATA 


XX X XXX X X X 




234 


DATA 


XXX X X 




235 


DATA 


XX X XXX X X X 




236 


DATA 


X X X X X X X 




237 


DATA 


XXXXXX X xxxxxx 




238 


DATA 


XX X X XX 




239 


DATA 


xx x y y yy 




240 


DATA 


X XX X X XX X 


- 


241 


DATA 


XX XX X X XX 




242 


DATA 


X X X XXX X 




243 


DATA 


yyyyyy y yyyyyy 




244 


DATA 


X X X X 




245 


DATA 


xxxxxxxxxxxxxxxxxxx 




246 


DATA 


&>2t4>9> XXXXXXXXXXXX 


XXXXXX U 4 


247 


DATA 


XXX XXX 




248 


DATA 


XXX X X XXX 




24'3 


DATA 


XX X X XXX 




250 


DATA 


X XX X X XX X 




251 


DATA 


XX XX XXX XX XX 




252 


DATA 


X X X X 




253 


DATA 


X XXXXX XXXXX X 




254 


DATA 


XXX X X X 




255 


DATA 


X X X X X 




256 


DATA 


X XXX X 




257 


DATA 


X XX X XX X 




258 


DATA 


X XXX X 




259 


DATA 


x x x x x 




260 


DATA 


XXX XXX 




261 


DATA 


X XXXXX XXXXX X 




262 


DATA 


X X X X 




263 


DATA 


"XX XX XXX XX XX 




264 


DATA 


X XX X X XX X 




265 


DATA 


X X XXX X X 




266 


DATA 


XXX X X XXX 




267 


DATA 


X X X X X X 




268 


DATA 


xxxxxxxxxxxxxxxxxxx 




269 


DATA 


8.. 3.. 1 .■ 12.. XXXXXXXXXXX 


'»*»'■''»' <l '% •*« •*■ 


270 


DATA 


X X 


- 


271 


DATA 


X X X X X X X X '4 X 




272 


DATA 


X X 




273 


DATA 


X X X X X X X X X X 




274 


DATA 


X X 




275 


DATA 


X X X X X X X X X X 




276 


DATA 


X X 




277 


DATA 


X X X X X X X X X X 




278 


DATA 


X X 





Report 








CP/M ist ein Vertreter jener Compu- 
terprogramme, die als Betriebssyste- 
me bezeichnet werden. Am Anfang 
der Entwicklung des Programms, Mit- 
te der siebziger Jahre, stand die Ab- 
kürzung CP/M für „Control Program/ 
Monitor"; in den letzten Jahren wurde 
es als „Control Program für Mikro- 
computer" bezeichnet. Beide Um- 
schreibungen sind sehr aussagekräf- 
tig. CP/M kontrolliert den Computer 
und gestattet es Ihnen, Anwendungs- 
programme der verschiedensten Fir- 
men auf Ihrem Personal-Computer 
laufen zu lassen. 

CP/M ist facettenreich wie ein Dia- 
mant. Es kann zu jedem beliebigen 
Zeitpunkt als Betriebssystem verwen- 
det werden, als Dateiverwaltungs Sy- 
stem, als Programmierhilfe oder als 
Werkzeug, um zwei oder mehrere 
Aufgaben zur gleichen Zeit ausführen 
zu lassen. In diesem Buch werden wir 
CP/M vom Blickwinkel des Benutzers 
aus betrachten und über die wichtig- 
sten Dienstleistungen sprechen, die 
CP/M Ihnen bietet. Damit CP/M wirk- 
lich nützlich sein kann, muß es not- 
wendigerweise ein wenig komplex 
sein. Wir haben versucht, es so ein- 
fach wie möglich darzustellen, ohne 
•dabei auf Gründlichkeit zu verzichten. 

Wir beginnen unsere Vorstellung von 
CP/M damit, die Ausstattung Ihres 
Computers zu besprechen, und gehen 
dabei insbesondere auf das Disketten- 
speichersystem ein, dessen Handha- 
bung eine der zentralen Aufgaben von 
CP/M ist. 

Computer Compact, Goldmann. Verlag, 

München 
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279 DRTfi X X X X XXX X X X X 

280 DRTfi X X X X 
?8i DRTfi X X X X XXX X X X X 

282 DRTR X X 

283 DfiTfi X X DU HAST ES« ''. 

284 DRTfi X X X GESCHAFFT X X 

285 DRTR X X 
2m DRTR X XX XX X X XXX 

28? DRTR X X 

■pop ftflTft —1 

Gfl0 pnp- T=100 TO = SOUND 0,100+T,10,T/10+2=HEXT T' SOUND 0,0, 0.-0 

601 POSITION Ö,23=? #6 i "START FUER HEUBEGINN"; 

602 IF PEEKC 53279 >*=6 THEN GRAPHICS 17 = P0KE 756^256 = GUTO 9 , ft " TMn MC . VT l( . kl 
700 FÜR 1=150 TO STEP -15 'FÜR U-I+109 TO I STEP -15'SOUND 0,U, 10, I/10*NErfT U'N 
FXT I ' RETUPN 

710 FOR 1=150 TO 8 STEP -i5=FGR U-I TO 1+10« SOUND 0,U, 10, V10=NEXT LhNEXT I»RETU 

RH 

9<9<9 IF R$="-l" THEN GOTO 600 

100O RETURN 
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Wer kennt IHN nicht den 

Spielhallenrenner 

„Donkey Kong", 

dem dieses 

Spiel nachempfunden 

ist? 

Trotzdem hier noch 

eine Erläuterung: 



Ein Affe hat Ihnen Ihre Frau gestohlen 
und sie auf ein Hochhaus verschleppt. 
Sie versuchen nun mit alten Mitteln 

sie zurückzubekommen. 
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Steuern Sie also den ausgeflippten 
Gnom mit dem Joystick so, daß Sie der 
pervers aussehende Affe nicht mit sei- 
nen Fußangeln erwischt. 
Wenn Sie nun mit viel Frust zur Frau 
vorgedrungen sind und sich der 
Scheiß-Computer immer noch nicht 
aufgehängt hat, haben Sie die Ehre, 
noch mehr Eintippfehl er korrigieren 
zu müssen. Also auf zum zweiten 
Screen, der Sie natürlich noch mehr 
frustrieren wird als der vorhergehen- 
de. Falls Sie keine Lust mehr haben 
(was ich sehr gut verstehen kann), 
brauchen Sie nur START, SELECT 
und OPTION zu drücken, um wieder 
zum ekelhaften Titelbild zu gelangen, 



von dem aus Sie sich mit OPTION die 
Spielanleitung durchlesen können. 
Wenn Sie ein Masochist sind, können 
Sie natürlich auch SELECT drücken, 
um den Schwierigkeitsgrad zu erhö- 
hen. Haben Sie sich nun auf diese 
Weise durch vier abartige Screens 
durchgekämpft, haben Sie die ehren- 
volle Aufgabe, das Ganze nochmals 
unter erschwerten Bedingungen 
durchzustehen. Wenn Sie nun immer 
noch nicht eingeschlafen sind, können 
Sie mal kurz Pause machen, indem Sie 
Cntrl. 1 drücken. Durch nochmaliges 
Drücken geht es weiter. Viel Spaß 
beim Eintippen und Kotzen. 



Nach einer ca. dreistündigen Eintipp- 
arbeit und einer noch längeren Fehler- 
suche präsentiert sich das Programm 
mit einer endlos langen Wartezeit, die 
dann durch ein ekelhaftes Titelbild ab- 
gelöst wird. Nehmen Sie nun einen 
Hammer und schlagen sie 3mal kräftig 
damit auf die Tastatur ihres Compu- 
ters. Wenn er jetzt noch funktioniert, 
können Sie das Spiel durch Drücken 
der Starttaste beginnen und so ihre 
Kotztüte endgültig füllen. Nehmen Sie 
nun Ihren ausgeleierten Joystick und 
ziehen und zerren Sie so lange daran, 
bis er abbricht. Wenn Sie sich nun 
einen neuen gekauft haben, können 
Sie es noch einmal probieren. 



Diese Beschreibung des Computerspiels „Donkey Kong 11 hat die 
Computronic-Redaktion original veröffentlicht. Unserer Meinung 
nach ist diese „Anleitung" umgekehrt proportional zur Qualität des 
eigentlichen Spielablaufes. 

Wir sind gespannt auf Ihre Reaktion. Schreiben Sie uns und teilen 
Sie der Redaktion Ihre Meinung mit! 



JL R EM -»-M"i«««>€~?€-*K 

2Ü H !E M -:i''^»-*E-M--3iiHiiH'iir JK O M trü -»^-»«-W-dK-M-Si- 

3 REM » BV 'THE BVTE W X B B IL E ,R * 

* iR E M ** & T H E Et X ¥ C Sl U M C H E R i ** 

JL ' Gl O -5 Li B 3 :Z B S 

:Z ö iL. y iL = 1. s G Q T ö 6 O S 

5 Ö ;R E IM 5 :P :i E IL S E G X ii'iil M 












HINWEIS: 

Der Verlag wird vom Autor berech- 
tigt, seine Manuskripte (Programm) 
zur Darstellung im Heft heranzuzie- 
hen und abzudrucken. 
Der Autor erklärt sich mit der Liefe- 
rung seines Programmes oder seiner 
Beiträge ausdrücklich bereit, die Ver- 
wertung durch den Verlag freizuge- 
ben, d. h., er überträgt nicht nur die 



Nutzung, sondern auch die Übereig- 
nung des Computerprogrammes und 
der Beiträge. 

Der Autor verpflichtet sich nur solche 
Programme anzubieten, die eigene 
Entwicklungen des Autors sind. 
Mit der Veröffentlichung oder dem 
Anlauf des Programmes und der Bei-, 
träge ist dem Verlag gestattet, auch 
eine anderweitige bzw. weitergehende 
Verwertung vorzunehmen, da der Au- 



tor dem Verlag das Copyright gegen 
Honorar gestattet hat. Die Verwer- 
tung durch den Verlag ist unbe- 
schränkt und unwiderruflich, wenn 
nicht «10 Tage nach Zusendung der 
Unterlagen durch den Autor wider- 
sprochen wird. 

Haben Sie Interesse? Haben Sie noch 
Fragen? 

Setzen Sie sich telefonisch mit unserer 
Redaktion in Verbindung! 
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.;!!.. 4 ::;!:: X F Z -~ 3 2 T H E M C 1... O R F Hi .:!!.. :: P L. O T F X X .. F :!!.. V S F .1. V — F A ¥ -B- :;L i! F Ir 


X :-::: 


Z S C O L. 


O R .1. .1 i iP !L O T F .1. K F F .1 V : F IL A G .1. = .1 : G O T Ö .1 4- US 






X .4 2 S X IF F 1!.... A G .1. =: :JL T H E H F .1 H R - F J. X R 






.1. 4 2 S IL O C A T iE F .1 H •<!•- F .JL X IR , F X ¥ , Z ' 






„1 .4 3 ö C O 1„ O !R F Ili JL ;i :P iL O 1" F JL K v . F .1. V ;; F .1 K = F 1. W ■!!■■ F JL X IR s C O iL.. O R 1. JL S P L. C 


T 


F X X ... F 


A v ;; F L. A ;&; jl = a : f h jl = z: 






JL 4. 4 O X IF F .1. X ~ S A iH il> F JL ¥ = 2 2 1" H iE U C O L. O R F H .1. s P l_ O T F JL K ., F JL ¥ ?, 


F X 


X:::::4 3 F 


A V ™: .1 Ö s !F H X = .1. '7 4 :i F JL H R ~ X ;; F L. A G .1. ::::: 






JL 4 5 S X IF il.„ 'iß iL. < 2 T H iE N A 4 S ! S 
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Z s COL 
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T 


F :;E X „ F 


2V s FLflG2 = fl ü FH£ = Z 






JL 4 5 I IF t C F 2 H ~: A IM 1> F 2 ¥ — 2 2 US ■ O R F 2 ¥ > ¥ 3 ißt M S> F JL V > X T H E IN 
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O L. O R 


F H 2 3 P I_ O T F 2 X , II" 2 V s F 2 X = 4 S F 2 V = JL O II F H 2 — JL 2 4 2 F2KH = .l 3 F !l_ A G2 = Ö 
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15 9 REH JUMP "? 
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T H IE N 
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, FHX 2 
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T H E M 
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F 8 IR X =: X T O Si : S O IIJ N & » ., T , X O ., T iL. : a 


Oü.il! , 'i!il> X , BT' , Jl. 


:;iÜ; „ E iL 3 T 1.. ~~ T iL. ■■ 


■ ST 


:i; iL. ~ 8 iL C 8 IL > 8 3 :: iN! E X T X 


* 


^ 




I F S "ii" IR X G C 8 UH -- © T H F N '::!■ 8 U M l> j. 8 , r fl 


, 2 3 8 ii J IN: li> .1. ... 


e , 8 , 8 5 G 8 T O 


2 7 


G O T O 2 7 X 2 8 








F O R X — X 5 1" 8 O 3 T IE P — ß.ZSä S 8 IU! IM !l> 


8 ., 3 3 , X 8 j. X s 


M E X T X 




IR: E T URH 








DATA 1,255,255,56, 10 8,188,13 1 , 


2 55,255 
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2 8 '0 .1 


ii> A T ißt 


3 ,255,255,231 , JL 3 5 „ JL 9 S ,' 2 31,2 5 5 , 2 5 S 


2 s © 2 © 


DATA 


4 , 2 5 5 , X 2 6, 125, JL 2 & .„ X 2 8 , 1. 2 © , JL 2 8 , 2 5 S 


2 8 3 


l> A "8" A 


5 , 2 4. , 2 4 ,. , JL 2 © , 2 JL "!:? , 8 © ... 3 & , X 2 


2 © © ,4 


D A T A 


© , 2 4. , 2 4 .,. JL '3 , .1 2 & , 2 X 8 ... © .1 ,, 2 3 .IL , X 3 8 


2 8 8 5 e 


D A 1" A 


7' „ 2 4- .„ 2 4 , 2 & © , X 2 © ,. 2 7 , JL S Ö , 2 3 JL , S S 


2 © ® 8 


H> A T A 


© , S , © , 6 , .t. JL JL , 2 -4 , JL 2 5 „ 7 JL , © 


2 © © 7 Ö 


ä> A T A 


3 . li? 8 ... li? © , © , 2 4 © , 2 4. ,, JL Üü 1 © , 2 2 8 -.,. © 


2 © O © 


Et- A "!!" A 


X © , 2 4 ... 3 © , F 2 4 , © . r . 2 4 r 2 4 .,, JL © 5 , 2 © 5 


2: © a 13 J 


3> A T A 


.1. .1. ,, 6 © , .1. O 2 , 2 © 7 , X 5 7 , JL 8 S , 2 4 3 , JL 8 2 , © 


2 © .1. © © 


3> A T A 


:L 2 .p 8 .,, 7 4- .,, 2 4 .» JL 8 'S' j. © ©., JL 2 © ... JL X 8 . ( , © © 


2 S JL .1 


& A T A 


JL 3 , © .„ 3 © ., 3 © , 2 4- ,. 2 4 , 3 6 , 3 © ., © © 


2 a .i. 2 


D A T A 


JL 4- .,, © © „ .1 2 & j, 6 © ., JL 2 © ... © © , JL 2 & ,. © © , .1. 2 © 


2 S .1 3 iß 


j|> A T A 


1. © „ © , JL 2 © ,, X 3 S ;, 2 JL 13' , S © , S 8 „ JL 2 © .„ X 2 © 


2 3 1 4 © 


1> A T A 


JL © , J. 8 8 4 = JL 1? S .,. JL '9 © , © ., X '9 6 ., X 13 3 ,. JL 3 ff 


2 e 1. '5 S 


Ü> A ■ ;!" A 


17 j, 2 4- .., 56 ., 1.2 .. e ,, 24 ,= 2 4 „ 1.2© ,. O 


2 8 JL © Ct 


!!> A T A 


JL 3 „ JL 3 ,. JL *? © ,= JL 2 .,, » 3 2 , 5? & , 2 3 © , 8 


2 s .1. "; ;? e 


!!> A T A 


JL '9 , JL 3 , JL 13- © ,, S , 4 4 , 6 , -1 S © ., .1. © Ö .,. 


2 e i. ö © 


Ü> A "l!" Ö 


2 .., .1. 1:i!' 2 ... 1. © 2 .j. X 13 2 , X 2 ,,, 2 4 , 2 3 3 , X 2 „ © 


2 3 .1. 13* e 


& A "!!" A 


2 X .., 2 3 3 ,. .1. S 2 .,= X 19 2 , 2 3 & , © , X 1? 3 .=. X © 3 , © 


2 3 2 


ä> A 1' A 


2 2 „ X © 8 ;i , JL. 9 S j. X 3 2 , 2 3 © .„ JL 1? © 4 . X "3 © ,. X © Ö , © 


2 © 2 .1 © 


Ei" A "!!" A 


2 3 .,. 2 5 4- , © , X 2 , 8 ... 4 © , 4 8 , 4 © ,, © 


2 3 2 2 © 


!!•> A "ü" A 


2 4- „ 1. © © „ X 3 © .„ X i:? 8 „ X 8 8 4 , X '9 © .„ 1. 3 © . ? 1. 8 8 , © 


2 B 2 3 © 


& A T A 


2 5 , X © © , .1 1:i? 8 j, X J 3 S » X .1 ©i , S , JL ~3 © , r±. © © ,, © 


2 © 2 4- © 


ä> A T A 


3 3 , X 3 © , X ";;? 8 ', X 7 © » 2 © 2 ,, X 7 © .„ X 7 8 „ .1. 3 & . P 8 


2 3 2 5 © 


D" A T A 


3 4 , Jä.. 7 iB „ X 7 © , 2 3 4 „ 2 3 4 , s 2 3 4 , X 7 © , X © 4 „ © 


2 3 2 © O 


»> A T A 


3 © , © 4 , X © „ X 3 4 „ & 4 .„ 3 2 „ X © © ,, © 4 , © 


2 e 2 7 © 


il> A T A 


3 © ... X 4 2 , X 3 2 , X 3 2 ... X 3 2 , X 3 2 .,. X 3 :•£ ,, 2 3 © , © 


2826S 


!S> A T A 


3 7 ... .1 7 .4 ... .1. © & ., X © Ö .. 172,7 2 ,. 7 2 ^ 7 © , P 8 


2 8 2 -9 © 


l> A T A 


3 8 , © 3 .,. X 7 © , X 3 © , 7 2 ., 4 © .„ 1. 7 © ,, © © , © 


2 3 3 © © 


3> A 1" A 


3 3 ,, 7 © , ? X 7 © , X 7 © ,. X 7 2 ,. X 7 © .„ X 7 ,. 7 4 ,. © 


2 8 3 JL © 


J> A T A 


4 8 , 2 2 4 , X 2 © .,. X 3 4 , X 9 2 .,= X 2 © .» X 3 4 ,. 2 2 4 , © 


2 © 3 2 


D- A T A 


4 JL , X 4 2 , X 3 © .„ X 3 © ,, X 4 © 4 , X 3 & , X 3 © , 2 3 3 .„ O 


2 8 3 3 © 


& A T A 


4. 2 .„ .1 2 3: ,. .1 2 © , X 3 4- ,. X 2 © , X 2 © , X 3 4 ,, 2 2 4 .., 8 


2 8 3 .4 © 


iD' A T A 


4 3 3. 2 r X 3 , X © .„ © .„ X 27,2 5 5 , 2 2 3 ... 2 © 7 


2 8 3 5 © 


IL> A T A 


4 4 . F 2 2 4. j, .1.. 7 © , 2 4 © , 3> © , 2 5 4 , 2 5 S , 2 5 1. , 2 4 3 


2 8 -3 6 © 


i!> A T A 


4 S ... X © 'S" , X -3 3 4 . 3 © ,. 7 4 . X 4- ,. X 4 4 . 2 © .„ 2 © 


2337 © 


ü> A T A 


4 © , 2 2 7 , 2 2. 7 , .1. 15 © ,. 2 2 4. , X X 2 , .1. X 2 , 5 © , S © 


2 8 3 8 8 


!> A T A 


4 7 ,„ 2 © , 2 © i, 2 © , H X 4 j. X 4 ,, JL. 4 , © 2 , X 2 © 


2 8 3 "9 © 


& a t a 


4 © , 5 © , © © 4 , S © , X X 2 4 , X JL 2 , X X 2 , X 24,126 


2 8 4 © © 


D- A T A 


4- Üü' 4 . 2 €J , 2 © , X .4 .„ X 4 ., © 2 ,, X 2 © , © ., © 


2 8 «4 JL © 


1> A T A 


5 8 ,. © © , © & , S © , X .1 2 , X .1. 2 .,. X X 2 .,. X 2 -4 ,. .1. 2 © 


2 8 4 2 © 


. !!> A T A 


5 X ... 1 © 4 . r X 7 © „ X 7 © =, 2 3 4 , X 7 © ,. .1. 7 © , ; . X © 4 , 


2 8 4- 3 


D- A T A 


© 2 ... .1 © © , X © 8 4 , JL i& 8 , X © © ., 2 2 4 , 2 2 4 4 , X © © , © 


2 8 4- 4 © 


IG' A T A 


© 3 ,, X 7 .4 ,, X © 4 ,, X © 4 ,, 2 2 © ... X © 4 ., X © 4. , X 7 4 , 


2 8 4- S © 


l!> A T A 


© .!Ü .,, X © © .,, X 3 © ... X 3 8 .,. 2 3 © „ X 7 . P X 7'© 4 , 7 4 .„ © 


2 8 4- © Q 


C- A T A 


s s „ 4 , x e , a , 8 4 , © , JL © , 4 , © 


2 8 4- 7 0. 


§5' A T A 


S © „ 7 4. , .1 "7 4 j. X 7 4 , 2 3 © ... 1. 7 4 4 . X 7 4. .,, X 7 8 , 8 


2 8 4. 8 © 


t> A "11" A 


© 7 .„ X © j, X © 4 . X © , 4. , .4 , 4- , 4 ... © 


2 8 4- © © 


8> A T A 


5 8 .„ '7 4 _,, JL 7 '€» 4 i X 7 «5 , :Ü. "7 © ,, X ';."' © 4 , X 7 e , © © 4 , © 


2 8 5 O 8 


E> A 1" A 


5 !:* .» i& .,, 3 , © .,, X 4 ,. JÜ. © .,, X © , 4 , 'S 


2 8 S JL 8 


ä> A "!!" A 


© 8 .>. 2 3 3 ... JL 3 2 , P X 3 2 4 . JL © © , X 3 2 , X 3 2 , 2 2 8 4 , © 


2 8 5 2 


& A "!i" A 


© X ., © © , X 7 © a , 3 4 , © 3 , 8 8 , © , © © , © , — 1 


2 1? © 8 


& A T A 


X .,, 2 5 © , :;;?: 5 5 , 5 © .,, X © „ 1. © © , X 3 X ., 2 © Ei ., 2 © © 


2 -3» JL 


& A T A 


3 , 2 5 5 ... 2 5 5 , 2 3 X .,. X *?< © 4 . X 95,2 3 X ... 2 © © .. 2 5 5 


2 1? © 2 


ü> A T A 


4 , 2 © © , X 2 '5 , X 2 G , X 2 '5 .„ .f. 2 © ,12 © 4 . X 2 © ,25 5 


299 3 


& AT A 


Eh ., 2 4. , 2 4 , X 13' 2 ,, X 2 © , 2 7 .„ © 8 , 3 © , X & 2 


2 -9 4. 


& A T A 


© _„ 2 4 , 2 4 , X © .„ 2 © , 2 4- , 2 4 , X © , 2 4 


2 3 O 5 © 


ä> A 1" A 


7 .,. 2 4 , 2 4 , Ö 4 . © © ., 2 4 ,. 2 4 ,. © , 2 4 


2 t? 8 


85' A "li" A 


© ,„©.,,© , © O .„ X X JL , 2 4 .., X 2 5 , 7 X ... © 


2 13> 7 © 


£> A T A 


3 , *=& © , 3 © , © © , 2 4 © 4 , 2 4 , X "98,2 2 © , 


2 © © © © 


ü> A T A 


X © .,3 6 .j, 2 4 .,, 3 © ., © s , 2 4 .,, 2 4 „ X © 5 j. 2 5 5 


2 13» 3 © 


ä> ATA 


X .1. , © © .,, X © 2 , 2 4 3 , X 3 © .,. X S 7 , 2 8 7 „ X © 2 , © © 
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2 13« X e e 


SD' A "II" A 


X 2 .,. © 4 .„ i & , X 5 2 ., S ... 6 O ... X 2 & , X JL 4 - © © 










2 3 X 1 


I> A T A 


X 3 , © .,• ... © ., © _. 3 © , 2 4 ... 3 © , © 










2 3' 1 2 


l> A T A 


X 4 , © 6 ,, X 2 6 , © © ... X 2 6 ., © "5 ,. X 2 8 .„ © © .? X 2 IS 










2 3 .1. 3 


f> A T A 


X 5 .,. , .1. 2 & |S , X 1? S .,, 2 .1. 8 ... 6ö, © O ... X 2 © , X 2 © 










2 8 JL 4- 


S> A T A 


X © ... X © Ö ., X 8 © , JL 1? 8 ... © , X 8 © , X 13' S , X © , 










2 13> X S 


K> A 1" A 


X 7 ,. 2 4- ... 5 © , X 2 , © .,, 2 4 , 2 4 ... X 2 & „ 










2 8 JL 6 


!1> A T A 


X 8 ,. X & 8 ., X 8 8 „ X 2 , @ , 3 2 , 8 © .,, 2 3 8 , © 










2 US' X 7 Öi 


E- « T A 


X 8 , X O 8 j, X 8 8 ... © ., 4 4 JP © , .;)L 8 8 ,. X © © ., © 










2 8 ,1. 8 


8> A T A 


2 ,. X 8 2 , X 92 , X 8 2 , X 2 , 2 © 4 ... 2 3 8. , X 2 , © 










2 'IIP' .1. 8 


S> A T A 


2 X .,, 2 3 © , X 13" 2 , X 8 2 , 2 3 & , © , X 8 8 , X 8 © ... © 










2 8 2 


U> A T A 


2 2 .„ X © © ... X 1? S , X 15 2 , 2 3 & , 1. 1:?' 8 , X 3 © , X © S , © 










2 'S* 2 x e 


iß- A T A 


2 3 , 2 5 4 , © ... .1. 2 ,, © , 4 8 , 4 8 , 4 8 4 . © 










2 8 2 2 


S> A 11" A 


2 4 .,, 1. 01 8 .. X 13' S ., X 'S 1 S ., X © Ö ., X 5 © j. X 3 8 ,, X 8 8 .,, © 










2 8 2 3 


B> A T A 


2 ©" j, X © 8 , X "IS 1 8 ,, X <% 8 .„ .;!!.. X 8 , © , X "S 1 8 „ JL. © 8 ,. 8 










2 8 2 4 


13' A T A 


3 3 .,, 19 8 » X 7 © .,. X 7 8 .,. 2 © 2 , X 7 © ., X 7 © ... X 3 © .. 










2 1? 2 © 


& A T A 


3 4 j. .1. 7 8 ,. X 7 CS ... 2 3 4 J( 2 3 4 .,, 2 3 4 ,. X 7 © 4 . JL © 4 .,, 










2 8 2 C> 


F& A T A 


3 S 4 , S 4. .,. X ß © j, X 3 4 .„ G 4 ., 3 2 ,, X fö © ., © 4 .„ 










2 8 2 7 


B* A T A 


3 © ., X 4 2 .» X 3 2 j. X 3 2 * X 3 2 , X 3 2 .„ X 3 2 , 2 3 8 .„ © 










213 2Ö0 


H> A T A 


3 7 ., X 7 4 , ; , X © 8 , X © 8 .,. X 72 * 7 2 , 7 2 , 7 8 , © 










2 8 2 13 1 


0> A T A 


3 8 ,, & 8 „ X 7 , X 3 & 4 . 7 2 j, 4 © , X 7 8 .„ © 8 .„ © 










2 8 3 


ir> A T A 


3 'ü? ... 7 © .. X 7 © ... X 7 © ,172 .„ .1 7 & 4 . X 7 8 ... 7 4- , 8 










2 8 3 JL 


ll> A T A 


4 ... 2 2 4 ... X 2 Ö .:. X 3 4 r JL T5 2 , X 2 © r X 3 4 , 2 2 4 , 8 










23320 


B> A T A 


4- X ... X 4 2 ., X 3 & ... .1 3 © ... X 4 © ., X 3 © 4 . X 3 8. j. 2 3 © . © 










2 9 3 3 


l!> A T A 


4 2 „ X 2 8 j, JL 2 8 .„ X 3 4 ., .1. 2 © 4 . X 2 © .,, X 3 4 ., 2 2 4. ,,, © 










2 8 3 4 O 


il> A "!!" A 


4 3 .„ 7 j, X 3 j, X © ., © , F JL 2 7 .„ 2 S S .,. 2 2 3 ., 2 © 7 










2 3 3 S 


ü> A T A 


4 4 ,,. 2 2 4 4 . X "?" © j. 2 4 .„ '3> © 4 . 2 S 4 „ 2 S © .„ 2 © X ... 2 4 3 










2 3 3G 


H> A T A 


4 © ,, X ^ S 1 j. X 'S' '3' 4 , •!!■? 3 ., 1?" , X 4 , X 4 .. 2 © ,,2 8 










2 8 3 7 


H> A T A 


4 6 ... 2 2 7 .„ 2 2 '7 .,. X '3 8 4 . 2 2 4 .,. X X 2 .„ X X 2 ,. 5 © .„ © © 










2 15 3 © 


B> A T A 


4 7 j, 2 8 .„ 2 4 , 2 8 ... X 4 .„ X 4 .„ .1 4 .„ © 2 ., X 2 © 










2 8 3 3' 


il> A "!l" A 


4 8 ... S 6. ., S © ... 'S © , X 1 2 „ X X 2 .,. X X 2 4 . X 2 4. .„ .IL 2 © 










2 'S- 4 


H> A T A 


4 •!:?' ,28., 2 © 4 . 2 © 4 , X 4 ,, 1. 4 4 , A 4 .„ © 2 ., X 2 © 










2 13' 4- 1. © 


!!> A 1" A 


58,56.56, 1. 11 2 4 . ± JL 2 _, X 2 4 4 . .1. 2 © , ... © 










2 8 4 2 


S> A T A 


© X 4 , .1. iß. 4- .,. X ;?■ 4 , X 7 .„ 2 3 «'$■ ... X 7 ... X 7 © 4 . .1. © 4 ., ©. 










2 8 4 3 # 


& A T A 


5 2 ., JL 6 © ... X 8 © ,. X © © ... X © © ,, 2 2 4 .„ 2 2 .4 .„ X © 4 . © 










2 '3' 4 4 © 


8> A T A 


© 3 ., X 7 4. .,. X '«8- 4 , X © 4 .„ 2 2 © 4 . X. © 4 4 . X © 4 4 , X 7 4 .,. 










29450 


B> A T A 


© 4 4 , X © © 4 . X 3 © , X 3 © .,. 2-3 8 , X 7 © , X 7 8 4 . 7 4 , 8 










294ö 


S> A T A 


S © ji 4 j. X ji 8 jt 8 . ? © j> X r 4- ji 










2^476 


DATA 


S © , 7 4... ±"7^. j. X 7 4 4 . 2 3 8 4 . X 7 4 4 . X 7 4 ,178,8 










2 13' 4- © 


S> A T A 


S 7 Jt 18, X © .. X 8 .„ 4 4 , 4 .„ 4 ,. 4 ., 8 










2 12 4 1i3' 


l> A T A 


S 8 4 . 7 4 , X 7 © 4 . .1. 7 8 , 1 7 8 .„ X 7 8 , X "7 8 .,. © 8 , 










2 1? S 


D A "il" A 


5 8 .„ © . r 8 j, 8 , X 4 # X 4 , JL 8,4 , 8 










2 3 iE? 1. 


DATA 


© 8 , 2 3 8 , X 3 2 , X 3 2 , X -3 6 , X 3 2 , J.. 3 2 , 2 2 8,' 8 










2 -3= S 2 & 


B> A "!!" A 


© X .,, 68,1 "7 8 , 3 4 , & 8. , © 8 , 0,88 , © , — X 










3 2 © 


R E M 


1' X T E L. Ä X M X T 










3 2 JL © 


G R A P 


■i :ü; C © X 8 :: S E "if ' C © L. o iR 8 y 7 , ä 










3 2 © 2 © 


P O 5 X 


r I O M & 4 . 4 ;; 2 »& ji i! a K O N G !! Uü 










3 2 © 3 © 


P O S X 


r x o w * , x x ;: ? ne .s a H p s_ e a s e m a x t " • .; 










3 2 © 4 © 


P A G E 


= P E E K C JL 8 © 3 — JL 2 s C H © •"- P A G E-»Ä 8 © s !P A G E 2 ™: P 


A G E — 4 


:: CH 


8 2 = C H 


s ■■■-■ X 


© 2 4 














3 2 © 5 © 


F O R 


X = 8 T O © X X !! POK E C H © 2 ■*■ X , P E! E K C 5 7 3 4 4 + 


XJi ! ME 


K "9" 


X 




3 2 © 6 


P K E 


© H 3 2 -ü- 2 4 , 2 5 5 S P 8 K E C H © 2 •-!!•• 2 S , 2 © 5 3 P 8 K E 


€^ H S 2 


II" 2 6 


, 2 3 X 3 


P Q K 


IE C H 13 \ 


£ -8- 2 7 , 


L i? 5 :! P O IK E C ii © 2 + 2 © , X 1ü* 5 










3 2 7 


P K E 


C H 'S 2 -II- 2 8, 2 3 X S IP © K E C H S 2 •♦■ 3 , 2 S 5 S P 8iK E 


C H :ä 2 


•II- 3 X 


, 2 5 S 




32©©© 


R E S T O R E 28868 


, 








3 2 © 8 © 


R E A S> 


C S X F C < > -- X T H E M F © R X = 8. T O 7 s R E A l& 


A s P O K E 


C HI S -*• C 


-M-8 + 


X , A ii N I 


■KT X 


S GOTO 32888 


■ 








3 2 © 8 'S 


R E S T 


3 R E 2 * ? 8 










3 2 X © © 


iR: E A l> 


C 5 X IF C < > - X T H E II 1 « F O R X .":: 8 T © 7 5 R E A il> 


A 5 POiKE 


8 H S -«" C 


M-8-H- 


X + X © 2 • 


1 , A i! N 


S K T X -i G O "0" O 3 2 X 8 © 










3 2 JL X . 


• ft IE T 3.8 R H 










3 2 "7 © © 


COLO R 3 2 : IF O R X = 2 T O 2 3 : P IL <D T 8 , X* 8 !i> R A 141" O 
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KT X s 


P Ei. 
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Computronic 



Unser Software-Service 

4£^*~ Tel.-Nr. 56 51 / 4 06 93 oder 4 06 43 

Erschrecken tun wir nicht ... 





trotz der Fülle von Bestel- 
lungen sind wir nach wie vor 
""^ \i^ in der Lage, innerhalb 

einer Woche zu liefern. 

Nicht nur in dieser Sache 
sind wir absolut Spitze. 

zu reklamieren. Wir bekommen immer 
noch angeblich defekte Datenträger 
Unser Software-Versand nimmt Re- zurückgeschickt, die nach einem Test 
klamationen gern entgegen. Defekte in unserer Computerabteilung jedoch 
Datenträger werden kostenlos umge- keinerlei Fehler aufweisen. Bitte über- 
tauscht. Beschädigte Ware wird eben- prüfen Sie in solchen Fällen (1-3 Re- 
falls zurückgenommen. Wir bitten un- klamationen) Ihre komplette Compu- 
sere Kunden trotzdem, nicht voreilig teranlage ! 



Um Ihren Auftrag möglichst schnell erledigen zu können, 
tragen Sie bitte alle notwendigen Angaben in den Bestell- 
schein ein und senden ihn an: 

Tronic-Verlag, Postfach 41, 3444 Wehretal 1 



computronk Bestellkarte-Software-Service 




Alle im Heft abgedruckten Programme können als zusätzlicher Service über den Verlag bezogen werden. 
(Ausland nur gegen Vorkasse) 


Die Zustellung erfolgt: gegen Vorkasse D 


oder Inland per Nachnahme D 


innerhalb von 1 Woche 


+ Versandkosten 


Entnehmen Sie bitte aus unseren Preislisten die notwendigen Angaben für Ihre Bestellung: 


Bitte liefern Sie mir: 




□ Cassette für 

Bestell-Nr. 


n An7ahl 


n Diskette für 

Bestell-Nr. 


D Anzahl 


zum Preis von gesamt 


DM | 


Name/Vorname: Straße, Nr.: 


PLZ/Ort: Datum, Unterschrift 



Compulronic 
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Atari 



■ 800 XL 

-Service 






* £ür Atari 600 
Programm 



m 










Preis /Kassette 



Preis /Diskette 



Bestell-Nr. 



Mastermind * 
Schlangenkrieg * 


10,50 


19,50 


I 41 


Tank-Battle 
Oil Panic 


12,50 


- 


I 51 


Startup 

Zeilen-Split 

Tomstone-City 




19,50 


I 71 


Painter 
Hardcopy 


14 — 


19,50 


I 81 


The Big Quest 
Fünf gewinnt 


14 — 


19,50 


I 91 


Splitt * 


11 — 


17,50 


1101 


Ski 
Mutation * 


14,50 


19,50 


1121 


Super Miner 
Diamonds 


14,50 


19,50 


I 22 


Donkey Kong 
Kerzenheinz 


16,50 


19,50 


I 32 



fl-99 

Software-Service 



mi> 



mk 



• - "" &■ iss- <*■ <r tt j>l> » jr & / J 
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Programm 


Preis /Kassette 


Preis /Diskette 


Bestell-Nr. 


Drei Kronen-Spiel 
Zahlenputzen 


8,50 


- 


T 41 


Karl der Käfer 
Alien-Landing 


14,50 


• - 


T 51 


Jack the Digger I 
Noah 2099 


14,50 


- 


T 61 


Lift Bär 

ASC II DEF Teil 1 


14 — 


- 


T 71 


Maya 

ASC II DEF Teil 2 


14,50 


- 


T 81 


ASC II DEF Teil 1+2 


- 


19,50 


T881 


Transfer 
Silverspar 


14,50 


19,50 ■ 


T 91 


Mother Duck 
Screen Designer 


14,50 


19,50 


T 101 


Cave Man 


8 — 


11,50 


T 121 


Moon Race 

Frogger 

Slicks 


19,50 


25,50 


T 22 


Panzerschlacht 


8 — 


11,50 


T 32 


r.nmnntrn 



Commodore 64 

Software-Service 




Programm 


Preis /Kassette 


Preis/ Diskette 


Bestell-Nr. 


Mauern 
Widerstand 


8 — 


15 — 


C 41 


Space-Comets 
Erdspalte 
Sprite- Data 


15 — 


23,50 


C 51 


Autostart 

Bestellschein 

Roadpainter 


16,50 


23,50 


C 61 


Hardcopy 

Space-Fighter 

Data-Generator 


15,50 


19,50 


C 71 


Monster-Attack 

Block-Painter 

Epson-Drucker 


16,50 


23,50 


C 81 


Projekt 
Datenbank 


16 — 


23,50 


C 91 


Spiders 
The Basic 


16,50 


23,50 


C101 


High Noon 

Skeet 

Grafik-Designer 


17,50 


23,50 


C121 


Painter 

Star-Baddle 

Editor 


17,50 


23,50 


C 22 


Wüstenrallye 

Jet-Pac 

Black Moore Castle 


17,50 


23,50 


C 32 



VC-10 

Software-Service 



Programm 


Preis /Kassette 


Preis/ Diskette 


Bestell-Nr. 


Bestellschein 
Glücky 


8,50 


15 — 


V 61 


Multigraph 
All Rammer 


11 — 


15,50 


V 71 


Zyklo 
Meteorit 


11 — 


19,50 


V 81 


Garten 

Schloß Gruselstein 


14 — 


19,50 


V 91 


Fressman 
Outlaw 


14 — 


19,50 


V101 


Prost 
Buffalo Bill 


14 — 


19,50 


V121 


Joy Man 
Powerpack 


14 — 


19,50 


V 22 



Der rasende Malocher 
Frankie goes to Pharao 



14.— 



19.50 



V 32 
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Programm 


Preis /Kassette 


Preis /Diskette 


Bestell-Nr. 


Wilder Westen 

Karambolage 

Maskengenerator 


_ 


19,50 


A 41 


Music-Maker 
Mission: Adler 
Disk-Katalog 


_ 


19,50 


A 51 


Snake 
Super Datei 
Shape-tables 




19,50 


A 61 


Library 
Fight 


- 


19,50 


A 71 


Reversal 

Disk-Menue-Generator 


_ 


19,50 


A 81 


Diamonds 
Hilfsprogramm 


- 


19,50 


A 91 


Tic-Tac-Toe 
Jumper 


- 


19,50 


A101 


Donovan 
Basic-Konverter 


'- 


19,50 


A121 


Funktionstasten 

Painter 

Bowling 


_ 


19,50 


A 22 


Thunder 
Castle of Doom 


- 


19,50 


A 32 



^\ 



Dragon 11 

Software-Service 






m 




Programm 


Preis /Kassette 


Bestell-Nr. 


Blizzard 


8 — 


D 


41 


Space-Flight 
Geosoft 


10, — 


D 


51 


Waregames 


8,50 


D 


61 


Laser-Attack 


8,50 


D 


71 


Hardcopy 


13 — 


D 


81 


Anwenderprogramm 


10 — 


D 


91 


Dragon Paint 


14 — 


D101 


Hnmputrr 




Programm 


Preis /Kassette 


Bestell-Nr. 


Inventur 


12 — 


S 41 


Missile-Comment 


8,50 


S 51 


Defender 

Lui der Wurm 

Alternativer Zeichensatz 


13,50 


S 61 


Matheprogramm 
Bongo-Beecatcher 


12,50 


S 71 


Solitaire 

Superstat 

Kleinstes gem. Vielfache 


14,50 


S 81 


Jump about 


14,50 


S 91 


Pac-Man 
Oil Panic 


14,50 


S101 


Frogger 


16 — 


S121 


Jump 


14,50 


S 22 


Jet Set Freddie 


8- 


S 32 



ZX-81 

Software-Service 
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& 






Programm 


Preis/ Kassette 


Bestell-Nr. 


Go-Ball 
Grand-Prix 


10 — 


Z 51 


Moon-Crash 
ZX-Draw 


10 — 


Z 61 


Tonprogramm 
Aldebaran 


10 — 


Z 71 


Reversi 


10 — 


• Z 91 


Panik Labyrinth 


10 — 


Z 101 


Expedition 


10 — 


Z 121 


Spinnen 


14,50 


Z 22 


Spukhaus 


14,50 


Z 32 
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ine lohnende Sache -*■ Computronic-Abo «- Eine lohnende Sache -»-Computronic-Abo «~ Eine lohnende + 



Nebenbei 

bemerkt ... 







**&$¥* 



eine lohnende Sache, so ein ABO ! ! ! 

Wir liefern Ihnen frei Haus: 

6 Ausgaben der Zeitschrift Computronic für 35j" DM 

(6 Ausgaben) 
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Computronic 

Abonnement 

Bitte ausschneiden 
und senden an: 
Tronic-Verlag, Postfach 41, 
3444 Wehretal 1. 

Hiermit bestelle ich die Zeitschrift 
»Computronic« 

ab Heft Nr 

zum Jahresabonnementpreis 
(6 Ausgaben) von DM 35,- 
inkl. Versand, Inland 
und DM 45- inkl. Versand, 
Ausland. 



Name/Vorname: 



Straße, Nr. PIz., Ort 

Ich wünsche folgende Zahlungsweise 
D Bargeldlos durch Bankeinzug: 



Bankleitzahl: 



Geldinstitut: Konto-Nr.: 

D gegen Rechnung 

D gegen Vorkasse 

(Betreffendes bitte ankreuzen) Datum, Unterschrift 

Abonnements-Kündigungen: 

6 Wochen vor Ablauf des Jahres-Abonsements. 

Außerdem kann ich diese Bestellung innerhalb von 10 Tagen beim 

Verlag widerrufen! Zur Wahrung der Frist genügt die rechtzeitige 

Absendung. 



Datum, Unterschrift 
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Unser Paketservice 



Für unsere Leser, die Überraschungen 
lieben, hier einige S u p e r- Angebote: 

Spitzen-Programme 
zum Spitzen-Preis: 

Besten-Nr. ioo kleines Programm-Paket 
Besten-Nr. 110 großes Programm-^Paket 
Besten-Nr. 200 exklusive Disketten-Box 




Bestell-Nr. 210 



exklusive Disketten-Box 



3 bespielte Kassetten DM 27,50 
3 bespielte Disketten DM 48,- 
8 bespielte Kassetten DM 64,50 
8 bespielte Disketten DM 99- 
inkl. 8 bespielte Disketten 
zum Preis von DM 148,- 
inkl. 10 Leerdisketten 
zum Preis von DM 99,- 



Alle bespielten Kassetten und Disketten wurden unserem Kassettenservice entnommen. 
Angebot gilt iür Commodore 64, Atari, TI-99, Apple, VC-20, ZX-Spectrum und ZX-81. 



Bestell-Nr. 300 



Computroni c-Angebot 



unsere Ausgaben Heft 4-8 
und 10 zum Sparpreis von 
DM 22,50 



Jutftpabout: 




Aus unserem 
Angebot: 



po^verp^ 



MaYj*: 






T V99/BasiS^^ 




s\^ 
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Software-Service 



aus unserem Angebot 



Spiders: 



Ziel des Spieles ist 
es, zwei Spinnen, 
die auf ihren Net- 
zen herumkrab- 
beln, zu beseitigen. 
Vernichten kann 
man die Tierchen 
allerdings nur mit 
Insektengift. Davon 
liegt noch genug im 
Keller, aber wo ist 
der Schlüssel? - Unser Topprogramm aus der Aus- 
gabe Oktober. Spiders gefällt durch eine gute Gra- 
fik und guten Sound. Gespielt wird mit Joystick an 
Port 2. Für Commodore 64. 




Frogger: 

Ein Spiel für den 
ZX-Spectrum 48K. 

Die beliebte Spiel- 
version jetzt auch 
für den ZX-Spec- 
trum. Ein Frosch 
hockt am Straßen- 
rand einer viel be- 
fahrenen Straße 
und versucht ver- 
zweifelt, sie zu 

überqueren. Ist ihm das gelungen, wartet eine zwei- 
te schwere Aufgabe auf ihn. Ein Fluß, verseucht mit 
Krokodilen, muß überquert werden. Das Spiel ver- 
fügt über einen guten Sound. 




Mother Duck: 

Ähnlich der Spiel version 
„Frogger". Eine Entenmutter 
muß einen Fluß überqueren, 
um Futter für ihre Jungen zu 
bekommen. Allerlei Untier 
hält sich 



Fressmann: 




jedoch 
im Was- 
auf 



ser 




und macht jede Flußüberquerung zu ei- 
ner gefahrvollen Angelegenheit. Für TI 
99. Benötigt werden Joystick und das 
TI.-Ext.-Basic-Modul. 



Oil-Panic: 





l^^^pi^Ä 


■£*-* * _ 


— — W»; 


m *■ 

M ■■■■■immm 


ff{| 


l^.^ w ......^.,->. 


^H 





Skeet: (Tontaubenschießen) 



Fressmann ist eine Pacman-Version. 
Das Programm, welches ohne Erweite- 
rung lauffähig ist, steht der Originalver- 
sion in nichts nach. Fressmann läuft auf 
dem VC 20 und wird mit Joystick ge- 
spielt. 



Projekt: 




Als Top- 
programm 
auserwählt 
von der 
Redaktion. 
Sie sollen 
eine ge- 
fährliche 
Mission 
ausführen. 
Um für die 

nächste Zeit genügend Uran zur Verfü- 
gung zu haben, sollen Sie eine Reise 
zum Mond unternehmen und nach dem 
edlen Metall suchen. Ihre Reise ist in 
fünf Phasen aufgegliedert, die nachein- 
ander bewältigt werden müssen. Ein 
schönes Spiel für den Commodore 64. 




Für Commo- 
dore 64. Dem 

realistischen 
Tontauben- 
schießen 
nachempfun- 
den. Von ei- 
nem Katapult 
geschleuderte 
Tontauben 
müssen reaktionsschnell getroffen werden. 
In diesem Spiel kann jeder seine eigene 
Meisterschaft austragen. Eine Supergrafik 
zeichnet besonders aus. 



Sie müssen versuchen, mög- 
lichst viele Tropfen aufzu- 
fangen, die aus 
einer defekten 
Ölleitung her- 
austreten. Aber 
aufgepaßt, denn 
der Eimer, der 
zum Auffangen 
da ist, ist mit nur 
vier Tropfen ge- 
füllt. Für ZX- 
Spectrum 48K. 



High Noon: 



Ein tolles Spiel für den Commodore 
64. High Noon besitzt eine schöne 
Grafik und eine hohe Spielgeschwin- 
digkeit. Gewählt werden kann zwi- 
schen 255!! verschiedenen Spielstu- 
fen. - Auf einer vielbefahrenen Post- 
kutschenstraße stehen sich zwei 
Cowboys gegenüber und duellieren 
sich. Ein Spiel für alle Western- 
Freunde. 




Computronic erscheint jetzt alle 2 Monate im Tronic- Verlag. Der Bezugspreis beträgt im Inland DM 6,50. 
Im Preis ist die gesetzliche Mehrwertsteuer enthalten. 

Tronic-Verlag GmbH • Postfach 41 ■ 3444 Wehretal 1 • Telefon 56 51 - 4 06 43 / 4 06 93 



